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SUMMARY 


This  is  a  final  report  on  the  research  project  supported  by  the  Air  Force  Office  of  Scientific 
Research  under  Grant  F49620-87-C-0074,  entitled  Development  of  Nonlinear  Transient 
Analysis  Algorithms  for  Dynamics  and  Control  of  Large  Space  Structures,  which  covered 
the  period  of  01  October  1987  to  31  December  1990.  The  objectives  of  the  research  have 
been:  (1)  the  development  of  improved  dynamic  modeling  techniques  that  can  capture  es¬ 
sential  response  components  encompassing  an  adequate  frequency  spectrum  in  lai  ge  space 
structures  including  dynamic  localizations,  and  (2)  the  development  of  efficient  algorithms 
for  solving  the  combined  structural  and  control  dynamics  equations  by  taking  advantage 
of  computer  hardware  and  software  advances  such  as  concurrent  computers.  We  now 
summarize  the  accomplishments  of  the  project. 

I.  Research  Accomplishments 

1.  Modeling  Techniques  of  Space  Truss  Structures  and  Solution  Techniques: 

Three-dimensional  beam  models  have  been  formulated  for  arbitrarily  large  rigid/ 
flexible  motions  by  two  complementary  approaches:  total  Lagrangian  and  convected 
coordinate  representations.  These  formulations  have  been  demonstrated  through 
numerical  implementations  for  beams  going  through  large  bending  and  torsional 
motions,  dynamic  spinning,  and  deployment  problems.  Emphasis  of  these  formu¬ 
lation  was  to  provide  an  efficient  interface  with  control  algorithms  for  simulating 
maneuvering  emd  reorientations  of  flexible  space  structures  undergoing  large  rota¬ 
tions.  Specific  accomplishments  include:  1)  an  efficient  and  accurate  algorithm  for 
the  computations  of  angular  orientations;  2)  a  convected  rigid-body  preserving  pro¬ 
cedure  for  the  computations  of  strain  energy  when  the  beam  is  subjected  to  large 
motions;  3)  an  element-independent  formulation  for  the  total-Lagrangian  derivation 
of  material  stiffness,  geometric  stiffness,  and  internal  force  vector  for  an  accurate 
prediction  of  bifurcation  and  post-bifurcation  states  of  the  beam. 
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2.  Algorithms  for  Control-Structure  Interaction  Analysis: 

Computational  algorithms  for  control-structure  interaction  problems  have  been  de¬ 
veloped,  which  exploit  the  second-order  differential  equations  of  motion  for  struc¬ 
tures  whose  discrete  coefficient  matrices  are  of  N-hy-N  sparse  symmetric  form  where 
N  is  the  size  of  the  equations  of  motion.  The  present  approach  is  in  contrast  to 
the  widely  adopted  canonical  first-order  differential  equations  of  2A'^-by-2A^  form, 
which  requires  a  considerably  more  computational  effort  than  the  A^-by-A^  second- 
order  models.  The  developed  algorithms  include:  1)  a  partitioned  procedure  that 
advances  the  solution  of  the  structural  responses  separately  from  that  of  the  control 
forces,  thus  preserving  the  software  modularity  of  both  the  structural  analysis  and 
control  force  computation  software  modules;  2)  a  suboptimal  control  gain  synthe¬ 
sizer  based  on  the  physical  matrix  forms  of  the  second-order  structural  dynamics 
equations;  3)  a  second-order  discrete  Kalman  filtering  solver  that  is  necessary  for  the 
synthesis  of  dynamically  compensated  control  laws;  4)  a  strategy  for  simultaneous 
optimization  of  the  structural  tailoring  and  control  laws. 


II.  Manpower  Training 

The  project  has  enabled,  along  with  two  other  related  research  grants,  four  graduate 
students  to  complete  their  PhD  theses.  Their  work  and  their  post-degree  activities  are 
briefly  described  below. 

W.  Keith  Belvin 

Degree  Received  and  Date:  Ph.D.  (August  1989) 

Thesis  Title:  Simulation  and  Interdisciplinary  Design 

Methodology  for  Control- Structure  Interaction  Systems 
Post-Degree  Appointment:  Aerospace  Engineer, 

NASA  Langley  Research  Center 

Thesis  Synopsis: 

Computational  procedures  for  preliminary  design,  synthesis,  and  simulation  of  control- 
structure  interaction  systems  are  developed  from  a  second-order  systems  viewpoint.  First, 
a  partitioned  solution  procedure  is  developed  for  the  solution  of  the  equations  of  motion 
with  feedback  controls.  The  computational  stability  and  implementation  aspects  of  the 
partitioned  computational  procedure  for  control-structure  interaction  analysis  is  presented. 
Implementation  issues  for  enhancing  both  accuracy  and  the  computational  stability  max  gin 
and  moduleu:  programming  of  the  procedure  are  addressed. 


2 


Second,  a  computational  procedure  that  takes  advantage  of  the  structure  of  second- 
order  differential  equations  is  developed  for  state  estimation.  It  is  shown  that  the  recon¬ 
struction  of  system  states  through  second-order  observers  is  computationally  more  attrac¬ 
tive  than  existing  first-order  observer  models  if  certain  mildly  restrictive  conditions  are 
satisfied.  Hence,  the  present  second-order  observers  enable  the  analyst  to  utilize  larger 
observer  models  than  have  been  possible  with  first-order  observer  models. 

The  third  issue  addressed  is  the  integrated  design  of  controlled  structures.  A  method 
for  optimization  of  the  controlled  structural  system  using  only  structural  tailoring  is  pre¬ 
sented.  Optimal  linear  quadratic  regulator  control  theory  is  used  and  the  closed-loop  per¬ 
formance  is  expressed  in  terms  of  structural  parameters.  Also,  a  software  testbed  has  been 
designed  and  implemented  for  evaluating  new  formulations  and  algorithms  for  controlled 
structural  analysis  and  design.  The  testbed  fully  exploits  existing  sparse  matrix  struc¬ 
tural  analysis  techniques,  modular  control  synthesis  capabilities  and  versatile  optimization 
methods  to  alleviate  unnecessary  structural  and  control  calculations.  The  testbed  has  been 
used  to  demonstrate  the  present  partitioned  procedures,  the  performance  of  second-order 
observers  and  the  effectiveness  of  structural  tailoring  for  improved  dynamics  and  control 
performance  on  a  number  of  realistic  spacecraft  applications. 

Janice  D.  Downer 

Degree  Received  euid  Date:  Ph.D.  (December  i990) 

Thesis  Title:  A  Computational  Procedure  for  the  Dynamics  of 
Flexible  Beams  Within  Multibody  Systems 
Post-Degree  Appointment: 

Assistant  Professor  (beginning  September  1991) 

University  of  Wi.sconsin,  Madison, WI 

Thesis  Synopsis: 

This  dissertation  is  concerned  with  the  dynamic  analysis  of  three-dimensional  elastic 
beams  which  experience  large  rotational  and  large  deformational  motions.  To  this  end. 
the  beam  motion  is  modeled  using  an  inertial  reference  for  the  translational  displacements 
and  a  body-fixed  reference  for  the  rotational  quantities.  Finite  strain  rod  theories  are  then 
defined  in  conjimction  with  the  beeim  kinematic  description  which  account  for  the  effects 
of  stretching,  bending,  torsion,  and  tramsverse  shear  deformations.  A  convected  coordinate 
representation  of  the  Cauchy  stress  tensor  and  a  conjugate  strain  definition  is  introduced 
to  model  the  beam  deformation.  Due  to  the  inertial  reference  of  the  beam  kinematics  and 
the  convected  reference  of  the  beam  stresses,  the  present  formulation  is  easily  interfaced 
with  general  multibody  dynzunics  methodologies  as  well  as  software  modules  for  active 
control  simulations. 
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The  niimencal  treatment  of  the  beam  formulation  is  considered  in  detail.  A  procedure 
to  compute  the  beam  internal  force  is  derived  from  the  continuum  formulation.  The 
procedure  is  proven  to  be  invariant  to  arbitrary  rigid  motions  of  the  beam  while  accurately 
modeling  the  beam  strain.  To  treat  the  beam  dynamics,  a  two-stage  modification  of  the 
central  difference  algorithm  is  presented  to  integrate  the  translational  coordinates  and  the 
angular  velocity  vector.  The  angular  orientation  is  then  obtained  from  the  application 
of  an  implicit  integration  algorithm  to  the  Euler  parameter/ angular  velocity  kinematical 
relation.  The  combined  developments  of  the  objective  internal  force  computation  with  the 
dynamic  solution  procedures  re.sult  in  the  computational  preservation  of  total  energy  for 
undamped  systems. 

The  present  methodology  is  also  extended  to  model  the  dynamics  of  deployment /retrieval 
of  the  flexible  members.  A  moving  spatial  grid  corresponding  to  the  configuration  of  a 
deployed  rigid  beam  is  employed  as  a  reference  for  the  dynamic  variables.  A  transient  in¬ 
tegration  scheme  which  accurately  accounts  for  the  deforming  spatial  grid  is  derived  from  a 
space-time  finite  element  discretization  of  a  Heimiltonian  variational  statement.  The  com¬ 
putational  results  of  this  general  deforming  finite  element  beam  formulation  are  compared 
to  reported  results  for  a  planar  inverse-spaghetti  problem. 
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Algorithms  for  Multibody  Dynamic  Analysis 
Post- Degree  Appointment:  Reseeuch  Associate, 

University  of  Colorado 

Thesis  Synopsis: 

In  the  distinct  fields  of  space  dynamics,  mechanism,  and  robotics,  engineers  have  effec¬ 
tively  modeled  their  disciplinary  problems  using  a  set  of  of  linked  bodies.  In  this  regard, 
computational  procedures  for  the  kinematic  and  dynamic  analysis  of  three  dimensional 
multibody  dynamic  (MBD)  systems  are  developed.  To  derive  the  equations  of  motion  for 
MBD  systems,  d’Alembert’s  principle  of  virtual  work  augmented  by  the  Lagrange  multi¬ 
pliers  technique  are  employed.  The  resulting  dynamical  equations,  which  are  characterized 
as  differentied-algebraic  equations  (DAEs),  not  only  possess  programming  modularity  but 
also  can  be  automatically  generated. 

The  existing  computational  schemes  that  have  been  used  to  solve  DAEs  have  suffered 
from  the  drawbacks  such  as  constraint  violations  during  the  process  of  time  integration, 
degraded  constraint  force  solution  involving  ill-conditioned  matrix,  the  large  computation 
expense  in  determining  system  dependent  and  independent  variables,  and  inefficient  to 
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apply  to  the  parallel  algorithms.  To  alleviate  these  drawbacks,  two  robust  and  efficient 
computational  schemes  which  involve  constrsdnt  stabilization  and  constraint  elimination 
are  developed  to  effectively  overcome  these  drawbacks.  A  explicit-implicit  solution  proce¬ 
dure  that  is  based  on  the  proposed  computational  schemes  is  also  developed  to  integrate 
the  equations  of  motion  and  obtain  accurate  solutions.  The  developed  solution  procedure 
can  be  readily  adopted  into  the  parallel  computation  environment  necessary  to  achieve 
real-time  simulation.  In  this  regard,  a  Schur  complement  based  parallel  preconditioned 
conjugate  gradient  numerical  algorithm  is  employed  to  speed  up  the  whole  computational 
process.  By  transforming  the  proposed  computational  schemes  into  the  arrowhead  matrix, 
we  have  successfully  altered  the  dynamic  equations  into  the  Schur  complement  form  so  that 
proposed  parallel  algorithm  can  be  equally  applied.  By  utilizing  current  existing  parallel 
computers,  this  algorithm  has  dramatically  reduce  the  computer  run  time  for  some  testing 
MBD  problems. 


Luis  A.  Crivelli 
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Thesis  Title:  A  Total- Lagrangian  Beam  Element 

for  Analysis  of  Nonlinear  Space  Structures 
Post-Degree  Appointment:  Research  Associate, 

University  of  Colorado 

Thesis  Synopsis: 

A  total-Lagrangian  formulation  for  the  large- displacement  large-rotation  static  and 
dynamic  analysis  of  beams  is  presented.  The  Timoshenko  beam  theory  is  used,  in  which 
cross-sectionrotations  are  independent  of  the  motion  of  the  neutral  axis.  The  beam  motion 
is  referred  to  an  inertial  reference  frame  and  it  is  split  into  a  translational  component  —  the 
motion  of  the  neutral  axis —  and  a  cross-section  rotational  component.  Specialized  forms 
of  the  Green-Lagrange  streiin  and  the  second  Piola-Kirchhoff  stress  are  obtained.  The 
formulation  uses  a  large  deformation  measure,  eind  it  accounts  for  bending-stretching  and 
bending-torsional  coupling  effects  without  introducing  special  provisions.  A  kinematically- 
independent  formulation  is  developed  which  allows  writing  the  core  components  of  the  finite 
element  matrices  independently  of  the  parametrization  chosen  for  the  large  rotations.  The 
corresponding  representation  of  these  core  matrices  in  terms  of  a  given  parametrization  is 
obtained  through  simple  matrix  transformations;  Results  are  presented  for  the  rotationa) 
vector  representation.  A  physical  interpretation  of  the  matrix  equations  is  also  given, 
which  allows  us  to  obtain  a  corotational  formulation  through  a-posteriori  simplifications 
of  the  governing  equations.  The  conceptual  equivalence  of  large  deformation  theories  with 
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corotational  theories  is  also  shown.  The  formulation  is  implemented  into  a  stand-alone 
C-code  software  modulewhere  new  ideas  for  finite  element  data  structure  and  organization 
are  being  tested.  Provisions  for  implementation  on  shared  memory  parallel  computers 
have  also  been  taken.  This  formulation  appears  suitable  for  static  and  dynamic  modeling 
of  large  space  structures,  limit  and  post-critical  analysis,  simulation  of  large  rotational 
maneuvering  problems  as  well  as  control-structure  interac  tion  problems. 

III.  Impact  of  the  Project 

The  project  has  had  an  impact  on  the  following  activities. 

1.  Preliminary  Simultaneous  Design  of  Controls  and  Structures:  The  use  of 

physically  based  second-order  control  laws  developed  during  the  project  period  has  enabled 
the  preliminary  designer  to  tailor  the  structural  parameters  as  an  intrinsic  function  of 
control  effort  or  to  size  up/down  the  control  parameters  as  an  apparent  function  cf  physical 
sizes,  thus  allowing  simultaneous  design  of  the  control  system  and  the  structure  in  terms  of 
physical  parsuneters.  This  is  in  contrast  to  current  control  design  practices  that  frequently 
lead  to  control  gains  that  cannot  be  translated  into  corresponding  mechanical  parameters, 
which  makes  it  difficult  to  realize  a  simultaneous  control/structural  trade-off  studies.  The 
preliminary  design  technique  developed  during  the  project  has  been  extensively  applied  at 
NASA  Langley  Resezirch  Center  in  the  design  of  an  evolutionary  earth-observing  platform, 
and  incorporated  in  further  research  by  researchers  at  UCLA,  VPI/SU  and  Purdue,  among 
others. 

2.  Second-Order  Simulation  Methods  for  Control-Structure  Interactions:  In 
order  to  achieve  the  simulation  of  control-structure  interactions  (CSI)  in  terms  of  second- 
order  solution  methods,  three  related  algorithms  have  been  developed.  The  first  is  a  control 
law  synthesis  based  on  second-order  form  as  discussed  above  so  that  widely  used  solution 
methods  for  the  structural  equations  of  motion  can  be  applied  for  CSI  simulations..  The 
second  algorithm  is  a  partitioned  solution  procedure  that  solves  the  control  laws  cast  in  a 
first-order  temporal  differential  form  in  a  separate  solution  module  so  that  the  structural 
responses  can  be  obtained  by  widely  available  second-order  structural  analyzers.  The 
third  algorithm  is  a  discrete  second-order  Ktdman  filtering  solver  that  can  be  used  in 
a  dynamicsdly  compensated  feedback  loop  in  conjimction  with  the  first  two  algorithms. 
Because  of  substantial  computational  advantages  that  the  second-order  CSI  algorithms 
can  offer,  ovu:  research  results  have  motivated  leading  researchers  such  as  Drs.  J.  N.  Juang 
and  Richard  Longmont  to  develop  their  feedback  laws  based  on  the  pole-zero  placement 
techniques  that  can  be  directly  implementable  on  the  second-order  form.  In  addition,  the 
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present  second-order  algorithms  constitute  a  key  kernel  in  the  development  of  efficient 
parallel  simulation  algorithms  as  discussed  later  in  this  section. 

3.  High-Fidelity  Flexible  Multibody  Beams:  The  physically  based  control  laws 
and  CSI  algorithms  discussed  above  are  in  general  applicable  to  linear  or  linearized  second- 
order  structural  systems.  The  flexible  multibody  beam  capability  developed  during  the 
project  can  accommodate  both  large  rigid  and  flexible  motions  without  resorting  to  con¬ 
ventional  assumed  modes  and  their  truncated  approximations.  As  control  laws  for  large 
three-dimensional  rigid/flexible  beam  maneuverings  are  problem-dependent  and  scarcely 
available,  emphasis  has  been  placed  instead  on  the  development  of  high-fidelity,  robustness 
aspects  of  the  present  beam  models,  instead.  Applications  of  the  present  capabilities  to 
cable  hockling,  three-dimensional  double  motions  and  similar  problems  indicate  that  the 
present  three-dimentioanl  beam  capabilities  accurately  predict  the  cable  hockling  phenom¬ 
ena,  one  of  the  major  failure  modes  for  long  space  tethers,  and  preserve  the  conservation 
of  energy  for  large  repetative  flexible  pendulum  motion,  an  important  requirement  for 
robust  nonlinear  control  strategies  for  reorientations  of  flexible  spacecrafts.  The  present 
capability  is  now  being  utilized  in  the  long-duration  motion  prediction  (one  or  multiple- 
orbit  liberation  perturbations)  of  spacecrafts,  particularly  the  Space  Station  due  to  flexible 
manipulator  movements,  the  Japanese  science  experimental  spacecraft  to  be  launched  in 
1994.  In  addition,  plans  are  under  way  to  utilize  the  present  capability  for  the  assessment 
of  deployment  aspects  of  20  meter  antenna,  20  km  tether  deployment  and  retrieval. 

4.  Parallel  Computing  for  CSI  Simulation:  The  second-order  models  of  the 

structure  and  the  state  estimator,  and  the  stabilized  controller  solver  were  implemented 
on  a  shared  memory  architecture  so  that  the  resulting  software  can  either  be  run  on  a 
CRAY  and  Alliant  machines.  It  has  been  demonstrated  that,  after  a  careful  compiler 
optimization  and  parallelization,  a  speedup  of  about  30  to  35  can  be  obtained,  with  about 
5  to  6  due  to  parallization  and  2  to  3  due  to  partial  vectorization  of  the  code.  The  present 
code  has  been  installed  at  NASA  Langley  Center  for  the  simulation  of  various  preliminary 
CSI  designs. 

IV.  Conclusions  and  Future  Activities 

The  present  project  has  achieved  solid  advances  in  three  important  areas  that  directly 
impact  the  simulation  of  dynamics  and  control  of  large  space  structures;  1)  a  physically 
based  control  law  synthesis  that  can  be  interchanged  to  structural  redesign  parameters, 
and  vice  versa  so  that  the  designer  can  perform  trade-off  studies  between  control  effort  and 
structural  redesign;  2)  efficient  second-order  based  CSI  simulation  algorithms  that  can  be 
implemented  on  a  spectrum  of  computers  from  a  workstation  as  well  as  a  shared-memory 
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machine;  3)  finite  element  beam  models  of  high-fidelity  to  physics  of  large  rotations  and 
suitable  for  implementation  into  flexible  multibody  dynamics  simulations. 

Of  severed  possibilities,  two  most  worthwhile  eispects  that  can  utilize  the  present  reserach 
results  are:  1)  the  development  of  maneuvering  laws  based  on  the  present  multibody  capa¬ 
bility  that  does  not  truncate  response  modes,  and  the  investigation  of  the  effects  of  using 
this  more  complete  structural  model  on  the  motion  perturbations  during  long-duration 
orbital  motions;  2)  the  development  of  efficient  paredlel  algorithms  on  local  as  well  as 
massively  parallel  computers  for  the  real-time  simulation  of  large-scale  flexible  multibody- 
modeled  spacecrafts  undergoing  a  simultaenous  maneuvering  and  vibration  control.  We 
intend  to  piursue  these  two  aspects  vigorously  in  the  coming  years. 
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Summary 


This  report  suxxunarizes  research  work  on  the  implementation  of  a  partitioned  ntimerical 
algorithm  for  determining  the  dynamic  response  of  coupled  structure/controller/estimator 
finite-dimensional  systems.  The  partitioned  approach  leads  to  a  set  of  coupled  first  and 
second-order  linear  differential  equations  which  are  numerically  integrated  with  extrapola¬ 
tion  and  implicit  step  methods.  The  present  software  implementation,  ACSIS,  utilizes  par¬ 
allel  processing  techniques  at  various  levels  to  optimize  performance  on  a  shared-memory 
concurrent /vector  processing  system.  The  current  work  also  generalizes  the  form  of  state 
estimation,  whereby  the  Kalman  filtering  method  is  recast  in  a  second-order  differential 
equation  equivalent  to  and  possessing  the  same  computational  advantages  of  the  structural 
equations.  As  part  of  the  present  implementation  effort,  a  general  procedure  for  the  design 
of  controller  and  filter  gains  is  also  implemented,  which  utilizes  the  vibration  character¬ 
istics  of  the  structure  to  be  solved.  Example  problems  are  presented  which  demonstrate 
the  versatility  of  the  code  and  compu'-ational  efficiency  of  the  parEillel  methods  is  exam¬ 
ined  through  nmtime  results  for  these  problems.  A  user’s  gviide  to  the  ACSIS  program, 
including  descriptions  of  input  formats  for  the  structural  finite  element  model  data  and 
control  system  definition,  can  be  found  in  Appendix  A.  The  procedures  and  algorithm 
scripts  related  to  gain  design  using  PRO-Matlab  are  included  in  Appendix  B.  lu  Appendix 
C,  a  stability  analysis  for  the  partitioned  algorithm  is  presented  which  extends  previous 
analysis  to  include  observer  dynamics,  leading  to  a  clearly  definable  stability  limit.  The 
source  code  for  the  parallel  implementation  of  ACSIS  is  listed  in  Appendix  D. 


1.0  Introduction 

The  present  work  on  the  implementation  of  a  partitioned  transient  analysis  algorithm  for 
the  siir.ulation  of  linear  Control- Structme  Interaction  (CSI)  problems  has  concentrated 
on  foiiT  major  areas.  The  initial  software  implementation  emphasized  the  user-friendly 
aspect  and  a  structtiral  dynamics-oriented  interface  for  experienced  practitioners  of  finite 
element  analysis  programs.  Another  reason  for  a  new  implementation  of  the  algorithm 
was  that  the  initial  architecture  of  the  CS3  software  testbed  developed  by  Belvin  and  Park 
[1-2]  had  little  provision  for  effective  parallelization.  CS3  also  included  extensive  links  to 
optimization  and  optimal  control  algorithms  which  were  not  central  to  the  current  work 
and  proved  to  be  a  further  hinderance.  This  new  software  implementation  was  designated 
ACSIS,  for  Accelerated  Control-Structitre  Interaction  Simulation,  md  led  to  significant 
improvements  in  speed  for  particular  problems  on  conventional  serial  processors  due  lo 
simpler  and  more  economical  storage  of  primary  variables.  ACSIS  is  also  versatile  in  its 
usage  of  a  general  Timoshenko  beam  element  with  pin  release  capability  and  shear  correc¬ 
tion  factor  adjustment,  and  control  system  definition  via  a  single  data  file.  A  preliminary 
Users  Guide  was  developed  for  ACSIS,  and  the  input  formats  were  made  compatible  with 
pre/postprocessing  software  developed  for  Sim  and  Silicon  Graphics  computers  so  that 
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future  versions  using  parallel  techniques  via  element  mesh  domain  decompositions  can  rely 
on  the  same  X- Window-based  I/O  utilities.  Table  1  doctunents  runtime  coinparisions  of 
ACSIS  and  CSS  on  a  sample  48  DOF  problem  simulated  on  a  Sun  3/260  workstation  using 
a  floating  point  accelerator. 


2.0  State  Estimation  via  Second-Order  Kalman  Filtering 

'  One  restriction  of  the  CSS  software  testbed  was  the  form  of  dynamic  observer  equations 
used  in  the  partitioned  'Igorithm  as  developed  in  [2].  However,  Belvin  eind  Park  [3]  showed 
that  a  general  Kalman  filtering  type  of  state  estimation  was  not  only  possible  in  the  parti¬ 
tioned  solution,  but  could  be  implemented  at  a  very  small  additional  cost  in  computations 
by  a  slight  modification  in  the  way  the  dynamical  equations  of  the  plant  are  cast  into 
first-order  form  for  filter  gain  design.  The  methods  employed  in  [3]  have  been  successfully 
implemented  into  ACSIS,  thereby  enhancing  the  code’s  ability  to  handle  a  wide  variety 
of  state  estimation  schemes.  This  is  important  as  the  application  of  optimal  control  tech¬ 
niques  to  the  state  estimator  problem  leads  to  this  more  general  form,  and  as  the  restric¬ 
tions  of  the  observer  used  in  CS3  typically  meant  either  discarding  part  of  the  observer 
gain  parameters,  resulting  in  a  loss  in  system  performance. 

ACSIS  retains  the  option  of  using  the  more  resricted  observer  form,  as  well  as  simple 
full  jtate  feedback  (no  dynamic  compensation).  It  is  clear  from  examining  the  respective 
equations,  that  for  structures  with  stiffness-proportional  dzunping,  the  only  additional 
calculations  required  for  the  Kalman  filter  is  the  multiplication  of  the  Li  gain  matrix  by  the 
predicted  state  estimation  error  vector  7  (see  equations  25  of  [3]).  This  is  not  a  significant 
portion  of  the  computations  required  at  each  integration  step,  as  the  dimension  of  7  is  small 
(number  of  sensors).  By  far  the  major  costs  are  for  computing  an  internal  force  of  the 
form  Kq,  and  backsolving  the  factored  integration  matrix  for  the  estimated  displacement 
states.  This  is  verified  ntimerically  in  the  ACSIS  results  of  Table  1  (using  a  restricted  form 
of  observer)  and  version  (Al)  of  Table  2.  The  model  used  in  Table  1  is  roughly  comparable 
to  the  54  dof  tniss  in  Table  2.  and  both  show  the  additioned  simulation  time  due  to  state 
estimation  is  roughly  the  same  as  an  additional  transient  analysis.  Finally,  the  Kalman 
filtering  equations  do  not  lead  to  any  additional  complications  in  parallel  implementation  of 
the  overall  algorithm  as  compared  to  the  more  restricted  second-order  observer  developed 
for  CS3. 


3.0  Parallel  Implementation  of  ACSIS 


A  primary  emphasis  in  our  work  dealt  with  the  optimization  of  the  software  implemen¬ 
tation  on  a  concurrent  processing  system.  The  platform  chosen  (primarily  due  to  avail¬ 
ability,  initially  at  CU  and  later  at  NASA  LaRC)  was  the  AUiant  FX/8  shared  memory 
multiprocessor  system  with  8  parallel  processing  units  and  vectorization  capabilities.  Ver¬ 
sions  of  the  software  have  been  ported  to  the  AUiant  and  compiled  using  the  Concentrix 
FX/Fortran  optimizing  compiler,  which  has  available  options  for  automatic  vectorization 
and  concurrency  of  standard,  problem-independent  paraUel  computations. 

The  partitioned  CSI  algorithm  has  three  primary  levels  of  paraUelism  in  its  numerics  which 
can  be  exploited.  At  the  highest  level  is  the  integration  of  the  second-order  dynamical  plant 
(structure)  and  filter  (estimator)  equations,  which  as  designed  are  of  roughly  equivalent 
size.  Through  the  algorithm,  these  systons  are  effectively  decoupled  and  independent 
at  each  discrete  time  step,  and  thus  may  be  handled  in  paraUel  by  invoking  a  compiler 
directive  in  the  main  program,  which  caUs  the  respective  subroutines  simultaneously  and 
handles  re-synchronization  of  the  execution  upon  their  return. 

At  a  lower  level  of  the  algorithm,  the  structure  and  state  estimator  equations  exhibit 
symmetric,  second-order  forms  typical  of  linear  structural  dyneunics  problems.  It  is  well 
known  that  computations  related  to  the  formation  of  the  internal  force  vector,  Kq,  can  be 
re-implemented  at  an  element  level  [4],  which,  through  decomposition  of  the  element  mesh 
[5],  can  be  handled  in  parallel  within  exclusive  subdomains.  This  technique  becomes  par- 
ticxUarly  attractive  for  larger  problems  on  mere  massively  parallel  systems;  in  the  present 
work,  the  element-by-element  (EBE)  technique  was  not  as  effective  as  other  types  of  paral¬ 
lelism.  It  should  be  noted  here  that  the  partitioned  algorithm  employs  implicit  integration 
methods,  leading  to  systems  of  algebraic  equations  which  are  factored  and  solved  using  di¬ 
rect,  rather  than  iterative,  numerical  methods.  Therefore,  foirnulation  of  the  internal  force 
vector  is  needed  only  in  the  formation  of  the  known  (right  hand  side)  vector  for  integration 
of  the  plant  and  filter  equations.  The  alternative  to  EBE  computations  is  multiplication  of 
the  relevant  displacement  vector  with  the  global  stiffness  matrix  stored  in  profile  (skyline) 
form.  To  “simulate”  the  advantages  of  local  memory  typical  in  large-scale  parallel  process¬ 
ing  systems,  the  computed  element  stiffnesses  were  saved  in  sheu^ed  memory  for  the  EBE 
calculations,  thus  avoiding  the  need  to  recompute  this  data  at  each  integration  step.  In 
addition,  a  low-overhead  automatic  element  domain  decomposition  was  provided  for  the 
parallel  EBE  method. 

The  final  and  lowest  level  of  parallelism  is  obviously  that  of  the  basic  matrix  computations 
such  as  addition,  multiplication,  etc.  These  numerical  operations  are  inherent  in  nearly 
all  areas  of  the  software  implementation,  including  problem  preprocessing.  With  the  very 
capable  optizmzing  compiler  available  on  the  AUiant  system,  this  paralleUsm  was  exploited 
through  vectorization  and  concurrency  of  the  nominal  source  code  using  the  FX/Fortran 
compiler  run-time  options  -0  -DAS  -alt.  The  performance  of  the  resultant  executable 
code  was  examined  using  the  AUiant ’s  profiUng  capabiUties,  and  changes  to  the  nominal 
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source  code,  remaining  compliant  to  F77,  to  maximize  the  identifiable  concurrency  and 
thus  enhance  the  resultant  speed.  This  was  particularly  \iseful  in  the  profile  matrix/ vector 
multiply  operation,  whose  speed  is  critical  to  the  overall  program  performance. 


4.0  Problem  Descriptions 

Three  structural  dynamics  problems  were  developed  for  code  testing  at  various  levels  of 
complexity.  All  three  problems  have  the  following  common  features:  simulations  consisted 
of  1000  integration  steps  and  employed  a  stiifiiess-proportional  damping.  The  damping 
was  not  needed  for  algorithm  stability,  but  to  ensxire  consistency  between  the  examples 
and  because  the  existence  of  damping  in  the  plant  equations  has  a  strong  infiuence  on 
program  speed.  The  Kalman  filter  models  were  of  second-order  form  [2]  and  equivalent  in 
size  to  their  respective  plant  models.  For  controlled  simulations,  the  control  system  began 
operating  after  100  integration  steps,  and  all  gain  matrices  were  full  (i.e.  all  model  states 
infiuence  all  actuators  and  are  influenced  by  all  sensors).  Additional  specific  information 
for  the  problems  follow. 

A.  Axial  Vibration  of  Elastic  Bar  (Spring  Model) 

#  Nodes:  3  free,  1  fixed 

#  Elements:  3 

De(,;ees  of  freedom:  3 

Actuators:  1 

#  Sensors:  1 

Distmrbance:  Initial  displacement 

B.  Planar  Vibration  of  Space  Truss  (Truss  Model) 

#  Nodes:  18  free 

#  Elements:  33 

#  Degrees  of  freedom:  54 

#  Actuators:  4 

#  Sensors:  6 

Disturbance:  Bang-bang  type  sinusoidal  applied  force 

C.  General  3D  Vibration  of  EPS  Satellite  Reboost  (EPS7  Model) 

#  Nodes:  97  free 

^  Elements:  256 

#  Degrees  of  freedom:  582 

#  Actuators:  18 

#  Sensors:  18 

Disturbance:  Bang-bang  type  square  wave  applied  force 
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As  can  be  seen,  the  problem  sizes  are  roughly  three  different  orders  of  magnitude,  with 
corresponding  increases  in  the  sizte  of  the  control  systems.  Appendix  B  includes  routines 
using  Matlab  for  the  design  of  control  and  filter  gains  which  were  used  for  the  control 
system  design  of  all  three  example  problems.  An  illustration  of  the  EPS  model  is  shown 
m  Figtire  1. 


5.0  Performance  Assessment 

Table  2  compares  CPU  runtimes  on  the  AUiant  computer  (using  the  UNIX  "time”  com¬ 
mand)  for  distinct  versions  of  the  software.  Version  (Al)  is  the  nominal  F77  program  code 
compiled  without  any  performance-enhancing  options,  while  version  (A2)  invokes  auto¬ 
matic  vectorization  and  concurrency  of  low-level,  problem-independent  computations  such 
as  vector  addition  and  inner  products.  The  performance  improvements  are  significant, 
especially  for  the  large  EPS7  model,  where  the  speed-up  factor  is  35-37. 

Version  (A3)  also  uses  the  compiler  options  from  (A2),  but  in  addition  has  a  compiler 
directive  added  to  the  main  program  which  allows  the  plant  and  filter  integration  subrou¬ 
tines  to  be  called  in  parallel.  This  does  not  affect  the  transient  response  results  as  that 
analysis  option  bypasses  the  altered  code,  but  for  controlled  response  there  is  some  effect 
on  performance.  If  filtering  is  used,  which  results  in  a  significant  increase  in  computation, 
the  directive  can  lead  to  some  increased  speed  as  can  be  seen  for  the  spring  and  truss  prob¬ 
lems.  There  can  also,  however,  be  a  reduction  in  performance  as  compared  to  (A2)  if  the 
finite  amoimt  of  processors  and  vector  units  are  used  in  a  less  efiicient  way.  This  appears  to 
be  the  case  for  the  large  EPS  problem,  where  the  ’’overhead”  introduced  by  the  directive, 
emd  its  effect  on  processor  assignment,  is  greater  than  the  improvement  generated  by  the 
manually-invoked  parallel  construct. 

Table  3  shows  CPU  run  times  for  ACSIS  using  E-B-E  computations,  which,  as  mentioned 
previously  did  not  lead  to  better  performance  on  the  example  problems  using  the  AUiant 
system.  This  appears  to  be  due  to  the  lack  of  effective  vectorization  of  the  individual 
element  computations  when  forming  the  internal  force  via  the  EBE  method.  To  deter¬ 
mine  whether  the  EBE  method  effectively  lead  slower  speeds  through  increased  numbers 
of  computations,  version  (A2)  (see  above)  was  altered  by  removing  compiler  optimization 
of  the  profile  matrix/ vector  multiply  routine  (the  alternate  method  to  EBE).  The  resultant 
nmtimes  matched  almost  exactly  with  those  of  version  (A4),  leading  to  the  conclusion  that 
both  methods  require  roughly  the  same  amount  of  computations,  but  differ  in  how  they 
can  be  optimized  on  the  AUiant  system.  The  matrix/vector  multiply  operation,  in  this 
environment,  can  exploit  both  vectorization  and  concurrency  through  the  complier’s  per¬ 
formance  options;  this  can  be  examined  in  the  compiler  output.  The  EBE  computations, 
at  the  element  level,  do  not  vectorize  because  the  parts  of  the  global  displacement  and  force 
vectors  being  operated  on  per  element  are  not  contiguous.  In  version  (A5),  the  elements 
within  each  subdomain  of  the  mesh  are  computed  in  paraUel,  leading  to  some  performance 
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improvement  over  version  (A4),  but  because  of  the  lack  of  element  level  vectorization,  this 
version  is  less  effiedent  than  (A2),  which  uses  a  compiler-optimized  matrix/vector  mul¬ 
tiply.  Finally,  version  (A6)  runs  parallel  operations  at  both  the  structure/observer  and 
element  force  level,  but  this  amount  of  process  branching  tends  to  degrade  performance 
for  the  small  number  of  processors  av^able  on  the  AUiant. 

Overall,  versions  (A2)  and  (A3)  provide  the  best  code  performance  for  the  hardware  avail¬ 
able.  Parallelizing  the  observer  and  structure  (A3)  leads  to  mixed  results;  improvement 
for  the  small  spring  and  tniss  problems,  but  not  for  the  large  EPS  model.  Element-by¬ 
element  computations  do  not  improve  code  performance  over  compiler  optimization  via 
vectorization  and  concurrency  for  this  platform.  Reimplementation  of  the  algorithm  lead 
to  a  5:1  improvement  over  the  CS3  testbed  software  on  a  serial  computer  (Table  1).  Fur¬ 
ther  optimization  of  ACSIS  on  the  AUiant  FX/8  lead  to  an  additional  30:1  improvement  in 
runtimes  for  large-order  systems  such  as  the  582  dof  EPS  model.  Time  history  responses 
of  selected  variables  for  the  example  problems  are  shown  in  Figures  2  through  10.  For 
Figures  8  through  10,  the  Ux,Uy,Us  displacements  plotted  are  located  at  node  45,  which 
is  located  at  th«>  vertex  of  the  large  antenna  of  the  EPS  model  (see  Figure  1). 


6.0  Conclusions 

The  present  work  has  demonstrated  the  efficiency  of  a  streamlined  simulation  code  for 
the  analysis  of  large-order  CSI  systems  and  the  viability  of  the  continuous  second-order 
Kalman  filtering  equations  for  state  estimation.  These  methods  show  the  versatility  of 
the  partitioned  CSI  integration  algorithm  and  the  promise  of  its  application  to  real-time 
simffiation.  It  is  evident,  however,  that  the  use  of  element-by-element  computational  tech¬ 
nique:  'eqmres  the  development  of  ixmovative  algorithms  for  effective  implementation  on 
massively  paraUel  processing  systems.  Future  work  in  this  area  wiU  include  integrating 
algorithms  for  on-Une  system  identification  and  applying  these  capabilities  to  the  problem 
of  real-time  control. 


Simulation 

CSS 

ACSIS 

Transient 

439.2 

98.8 

Full  State 

Feedback 

688.2 

181.5 

FSFB  with 

Observer 

1156.7 

282.3 

Table  1:  Comparison  of  Runtime  Speeds  for  CSS  and  ACSIS 

on  a  Sun  3/260  System 


(Al) 

(A2) 

(A3) 

Problem 

Nominal 

Compiler 

Parallel 

Model 

Type 

Code 

Optimized 

Observer 

3  DOF 

Transient 

6.6 

2.1 

2.1 

Spring 

FSFB 

8.0 

3.3 

3.3 

K.  Filter 

12.3 

3.5 

3.3 

54  DOF 

Transient 

78.2 

5.7 

5.6 

Truss 

FSFB 

97.1 

9.4 

10.2 

K.Filter 

170.7 

13.0 

10.7 

582  DOF 

Transient 

3506. 

98.6 

100.3 

EPS7 

FSFB 

7040. 

190.2 

294.5 

K.  Filter 

n/a 

284.2 

312.5 

Table  2:  CPU  Results  for  Versions  of  ACSIS 
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(A4) 

(A6) 

(A6) 

Problem 

e-b-e 

Parallel 

Parallel 

Model 

Type 

Computation 

E-B-E 

Obs.  &  EBE 

3  DOF 

Transient 

3.8 

3.3 

3.3 

Spring 

FSFB 

4.9 

4.4 

4.9 

K.  FUter 

6.6 

5.6 

5.0 

54  DOF 

'Dransient 

31.7 

13.0 

13.0 

Truss 

FSFB 

35.5 

16.9 

35.6 

K.Filter 

62.6 

27.3 

36.2 

582  DOF 

Transient 

391.7 

153.9 

n/a 

EPS7 

FSFB 

485.9 

245.9 

n/a 

K.  Filter 

n/a 

n/a 

n/a 

Table  3:  CPU  ResxUts  for  ACSIS  with  EBE  Computations 


Figure  1:  EPS  Finite  Element  Model 


Spring  Model:  Controlled  Response  w/Kalman  Filter 
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Figtire  4:  Spring  Response  w/Filter 


Truss  Model:  Open  Loop  Transient  Response 
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Figure  6:  Tniss  Transient  Response 


Truss  Model:  Full  State  Feedback  Response 
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Figure  6:  Truss  FSFB  Response 
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Figure  8:  EPS  Transient  Response 
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ACSIS  User’s  Manual 
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Control 

Structure 

Interaction 

Simulation 


Introduction 

ACSIS  IS  an  analysis  program  for  full-order  simulation  of  control-structure  interaction 
(CSI)  problems.  The  CSI  simulation  is  carried  out  using  a  partitioned  analysis  pro¬ 
cedure  which  treats  the  structure  (or  plant),  the  observer,  and  the  controller/observer 
interaction  terms  as  separate  entities.  This  procedure  allows  ACSIS  to  maintain  rela¬ 
tively  small,  sparse  matrix  equations  when  compared  to  the  process  of  assembling  the 
computational  elements  into  a  single  set  of  equations  of  motion  and  solving  simultane¬ 
ously.  Although  this  software  can  also  carry  out  modal  analysis,  the  transient  response 
and  CSI  simulation  are  done  in  real  space  using  the  entire  finite  element  model.  (For 
more  information,  see  Ref.  2  of  report,  p.  14) 

The  ACSIS  program  is  run  using  two  previously  prepared  data  input  files  and  interactive 
input  of  run  options.  The  two  data  input  files  are  the  finite  element  input  file  and  the 
controller  definition  file. 


Interactive  Options 

The  run  options  are  as  follows,  note  that  no  defaults  exist,  data  must  be  input  each 
time  it  is  requested  for  each  item  requested  except  during  a  background  run.  Files  may 
be- given  any  names,  example  names  are  given  only  to  match  the  truss  example  at  the 
back  of  this  manual. 

Please  input  analysis  type: 

This  option  is  for  selectmg  modal  analysis,  CSI  simulation  or  the  transient  response  of 
a  structure.  Not  all  interactive  inputs  are  required  for  each  analysis  type. 

Do  you  wish  to  save  an  input  file?  (y  or  n) 

This  option  creates  a  file  which  saves  all.  the  interactive  input  options.  ACSIS  can  be 
background  nm  with  minor  option  changes  by  editing  this  file  and  then  directing  the 
screen  input  to  this  file.  This  file  is  very  different  for  each  analysis  type  .  (To  do  this 
run  with  the  example  names  after  running  acsis.exe  once  interactively,  the  command 
would  be:  acsis.exe  <ZNP.truss>  k. 

Name  of  save  input  file?  (filename) 

This  question  asks  for  the  name  under  which  to  save  the  interactive  input,  example 
name:  INP .truss 

Finite  Element  Model  Input  File  Name  (filename) : 

This  file  should  contain  all  the  finite  element  nodes,  mesh,  materials,  properties,  lumped 
inertias,  fixations,  and  initial  velocity  and  displacement  conditions.  It  must  be  prepared 
in  advance  in  the  card  format  specified  later,  example  name:  FEM.truss 

Number  of  modes  desired? 

This  only  appears  in  the  modal  analysis  to  request  the  n\imber  of  modes  to  be  output. 
The  actual  analysis  is  carried  out  with  double  this  number  of  modes  for  accmacy. 

Controller  Definition  File  Name: 

This  only  appears  for  the  CSI  simulation.  The  file  should  contain  the  actuator  and 
sensor  locations,  control  gains,  and  observer  gains.  It  also  must  be  prepared  in  advance 
in  card  format,  example  name:  CON.truss 

Please  input  type  of  control:: 

This  option  is  for  selecting  the  form  of  control  law  equations  used  in  the  CSI  simulation. 
Full  state  feedback  uses  the  current  states  of  the  plant  (structure)  to  determine  the 
control  via  constant  gain  matrices.  Second-order  observer  uses  only  the  L2  filter  gain 
matrix  of  a  Kalman  filtering  type  of  state  estimation  where  the  state  variables  are 
position  and  velocity.  The  Kalman  filter  option  allows  the  use  of  a  full  set  of  filter 
gains,  but  the  gain  design  must  come  from  a  alternate  variable  casting  using  position 
and  generalized  momenta. 
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Initial  tiaa,  final  tiaa»  control-on  tima,  step  size: 

Data  format  is  four  columns  for  CSI,  but  only  three  coliuxms  for  transient  response  since 
the  control-on  time  part  is  deleted. 

Forcing  function  ID,  scale  factor,  damping  coeff-  a,b: 

In  order  for  any  time  dependent  forcing  function  to  be  easily  implemented  despite  vari* 
able  time  step  sizes,  the  forcing  functions  must  be  entered  into  the  subroutine  f  orces.f . 
The  format  is  to  assign  each  new  forcing  function  an  ID  number  in  a  elseif  statement. 
An  example  of  forces.f  is  included  at  the  back  of  the  manual.  Then  f  orces.f  must 
be  recompiled  into  an  object  file  and  acsis.eze  relinked.  This  is  easily  done  by  typing 
make  which  detects  changes  to  the  fortran  files  and  does  only  the  necessary  compiling. 
A  particulzu:  forcing  function  is  chosen  by  entering  its  ID  number  in  the  first  column, 
in  addition  the  force  can  be  scaled  by  a  constant  using  the  scaling  factor  in  the  second 
column.  The  Rayleigh  damping  coefficients  a  and  b  are  the  third  and  fourth  columns. 

Phase  lag  fix?  (y  or  n) : 

Specifies  whether  to  include  an  extra  iteration  of  control  and  sensor  state  prediction 
at  each  integration  step  to  improve  accuracy.  Not  generally  needed  unless  the  user  is 
investigating  the  source  of  instability  in  a  simulation  and  needs  to  test  the  sensitivity 
of  the  response  to  the  partitioned  algorithm’s  extrapolation  method. 

Gain  scale  factors  (4  total) : 

These  scaling  factors  are,  in  order:  the  FI  control  gmn  matrix  (displacement),  F2  control 
gain  matrix  (velocity),  LI  and  L2  state  estimator  filter  gain  matrix.  This  question 
appears  only  for  CSI. 

ACSIS  has  two  types  of  output  options.  The  first  is  the  displacement  or  velocity  motion 
of  up  to  twenty  separate  degrees  of  freedom.  Interactive  questions  art,  ‘Number  of 
displacement  results  to  output  (max  10)’  followed  by  as  many  ‘Input  node  #, 
dof  for  displacement  output  #’  as  necessary.  Then  these  repeat  for  velocity  results. 
The  name  of  the  file  where  the  output  will  be  stored  is  requested  by  ‘Output  file 
name?  (filename).’  example  name:  OUT_truss.  The  second  output  option  saves 
the  .displacement  of  all  nodes  at  any  time  step  where  output  is  sent  (see  next  entry). 
The  format  is  stiitable  for  animation  of  the  entire  structure.  Question  asks  ‘Animation 
Output?  (y  or  n)’  then  for  an  animation  filename  if  necessary. 

Send  output  every  hov  many  steps? 

This  option  affects  both  output  options  to  reduce  the  size  of  the  output  and  animation 
files.  It  causes  output  to  only  be  sent  after  a  integer  number  of  time  step  iterations.  To 
get  output  each  time  step,  simply  enter  1. 
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Finite  Element  Input  File 


The  finite  element  input  file  consists  of  title  cards  followed  by  columns  of  data.  The  title 
cards  can  be  in  any  order,  but  they  must  be  all  capitalii^ed  with  the  appropriate  number 
of  columns  of  data  for  each  card.  The  program  reads  rows  of  data  until  encountering 
a  new  card.  Data  which  represents  an  integer  value  may  be  entered  with  a  decimal 
point  while  real  data  may  be  entered  without  a  decimal  point  as  necessary.  Any  line 
beginning  with  a  *  anywhere  in  the  fide  is  ignored  and  can  be  used  to  insert  comments. 
Any  blank  line  will  result  in  a  read  error. 

HODES 

Each  node  must  be  defined  on  a  separate  line.  Colximns  can  be  separated  by  any  number 
of  spaces  or  a  comma.  Data  format  is  four  columns:  node  number,  x-coordirate,  y- 
coordinate,  z-coordinate. 

TOPOLOGY 

Each  element  must  be  defined  on  a  separate  line.  Truss  elements  require  two  nodes  then 
two  columns  of  zeroes.  (Truss  elements  would  also  reqmre  pin  releases  in  ATTRIBUTES 
below.)  Beam  elements  require  two  nodes  then  a  third  reference  node  representing  a 
point  in  the  xz  plane  of  the  beam  and  then  a  column  of  zeroes.  Element  type  refers  to 
finite  elment  formalation.  (Currently  only  type  1  =  timeshenko  beam  element  is  now 
available.)  Data  format  is  six  columns:  element  number,  element  type,  node  #1,  node 
#2,  node  #3,  node  #4. 

ATTRIBUTES 

Each  element  is  characterized  by  an  ID  number  from  each  of  the  MATERIAL  emd  PROP¬ 
ERTIES  cards  below.  Each  element  also  has  six  pin  release  codes.  The  first  code  is  for 
longitudinal  stiffness,  the  second  code  is  for  torsional  stiffness,  the  third  smd  fifth  codes 
are  bending  stifiEness  at  each  end  in  the  y  direction  and  must  be  the  same  vedue,  and  the 
fourth  and  sixth  codes  are  for  bending  stiffness  in  the  z  direction  and  also  must  be  the 
same.  (0  is  stiff,  1  is  released.)  Data  format  is  nine  columns:  element  number,  materiail 
type,  property  type,  and  six  pin  release  codes. 

MATERIAL 

The  material  data  is  formatted  in  four  columns:  material  type.  Young’s  modulus,  shear 
modulus  and  density  of  the  material. 

PROPERTIES 

The  properties  data  is  formatted  in  six  columns:  property  type,  cross  sectional  area  of 
the  element, Jy  «  J«,7y,  J«,  shear  shape  factor  SSF2,  shear  shape  factor  SSF3. 

FIXITY 

Nodes  with  any  fixations  are  defined  here  in  the  finite  element  file.  The  nodes  must  be 
entered  with  the  fibdty  of  all  six  of  their  DOF’s,  restrained  or  not.  (1  is  restrained,  0  is 
firee)  Data  format  is  seven  columns:  node  number,  x,  y,  z,  <l>x,<f>y,<l>x- 
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INERTIA 


All  lumped  inertias  must  be  entered  with  each  separate  DOF  on  an  individual  line. 
Therefore  a  single  node  could  take  up  to  six  lines  to  define.  Data  format  is  three 
coliunns:  node  number,  DOF  number  (1-6),  and  value  of  inertia. 

INITIAL  CONDITIONS  • 

All  initial  displacement  and  velocicy  conditions  are  entered  into  the  finite  element  file. 
Data  format  is  fotu*  columns:  node  number,  DOF  number  (1-6),  initial  displacement, 
and  initial  velocity. 

END 

End  of  file. 

Controller  Definition  Cards 

The  controller  defintion  file  also  consists  of  title  cards  followed  by  data  entry.  Each  card 
must  be  followed  by  the  appropriate  number  of  coltunns  of  data  and  in  some  cases  the 
appropriate  number  of  rows.  Integers  can  be  entered  in  real  format  and  vice  versa  if 
necessary.  Any  blank  line  will  result  in  a  read  error. 

NACT 

Number  of  actuators  in  the  entire  control  system. 

BMAT 

This  entry  creates  the  actuator  position  matrix  or  B  matrix.  There  should  be  one 
row  for  each  actuator,  data  format  is  four  colunans:  node  number,  DOF  number  (1-6), 
actuator  number,  and  sensitivity. 

NSEN 

Number  of  sensors  in  the  entire  controls  system. 

HDHA 

This  entry  creates  the  matrix  of  displacement  sensor  locations.  One  row  per  displace¬ 
ment  sensor,  data  format  is  four  coliunns:  node  niunber,  DOF  nxunber  (1-6),  sensor 
number,  and  sensitivity. 

HVMA 

This  entry  creates  the  matrix  of  velocity  sensor  locations.  One  row  per  velocity  sensor, 
data  format  is  four  coliuxms:  node  number,  DOF  number  (1-6),  sensor  nxunber,  and 
sensitivity. 

FIGA 

This  is  a  list  of  the  FI  or  displacement  control  gains.  The  data  format  is  four  columns: 
node  nxunber,  DOF  nxunber  (1-6),  actuator  nxunber,  and  value  of  gain. 
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F26A 


This  is  a  list  of  the  F2  or  velocity  control  gains.  The  data  format  is  four  columns:  node 
number,  DOF  number  (1-6),  actuator  number,  and  value  of  gain. 

L16A 

This  is  a  list  of  the  state  estimator  LI  filter  gains.  The  data  format  is  fovir  columns: 
node  munber,  DOF  number  (1-6),  actuator  number,  and  value  of  gain. 

L2GA 

This  is  a  list  of  the  state  estimator  L2  filter  guns.  The  data  format  is  four  columns: 
node  munber,  DOF  number  (1-6),  actuator  munber,  and  value  of  gain. 

END 

End  of  file. 


Examples 

This  section  includes  all  the  files  and  procedures  needed  to  run  all  three  analysis  on  a 
simple  elastic  bar  problem.  The  naming  of  the  files  is  a  simple  and  easy  to  remember 

system,  however  no  particular  format  is  necessary. 

« 

The  finite  element  file  was  created  simply  by  t3rping  the  node  locations,  connectivity 
(topology),  etc.  with  a  text  editor. 


File:  FEM>spring 


MESH 

* 

NODES 

1  0.00  0.00  0.00 

2  1.00  0.00  0.00 

3  2.00  0.00  0.00 

4  3.00  0.00  0.00 

TOPOLOGY 

1  112  0  0 

2  1  2  3  0  0 

3  1  3  4  0  0 

ATTRIBUTES 

1  11011111 
2  11011111 
3  11011111 

MATERIAL 

1  1000.  0.0  0.0 

PROPERTIES 
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1  1.00  0.00  0.00  0.00  0.0  0.0 

FIXITY 

1  111111 
2  0  11111 

3  0  11111 

4  0  11111 
IKERTIA 

2  1  0.100 

3  1  0.100 

4  1  0.100 
IHITIAL 

3  1  0.100  0.000 

END 


The  modal  analysis  only  requires  the  number  of  modes  desired  in  addition  to  the  finite 
element  file.  The  file  INPjspringO  documents  the  interactive  inputs  used  in  the  modal 
analysis.  The  resvdts  are  saved  in  file  £IG..spring. 


File:  INP_spring0 


-1 

n 

*  ACSIS  input  file, two  lines  above  are- 

*  analysis  type  and  save  input  file.  Do 

*  not  change  then  by  editing  this  file. 

*  Finite  element  input  file? (filename) 
FEM. spring 

-*<  Number  of  modes  desired? 

3 

*  Output  file? (filename) 

EIG_ spring 


File:  EIG..spring 


SUBSPACE  ITERATION  ROUTINE 

NB  OF  EIGENVALUES-  3 
NB  OF  VECTOR-  3 
NB  OF  t)0F-  3 

TOLERANCE-  l.OOOE-04 

NB  OF  RIGID  MODES-  0 


ITERATION  NO  1 
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l.OOOE-i-00  1.000E400  l.OOOE+OO 

ITERATION  HO  2 
1.297E-14  3.194E-14  3.899E-14 

EIGEN  ANALYSIS  RESULTS: 

RADIAL  CYCLIC 

MODE  EIGENVALUE  FREQUENCY  FREQUENCY 


1 

1980.6 

44.504 

7.0831 

2 

15550. 

124.70 

19.846 

3 

32470. 

180.19 

28.679 

EIGENVECTORS: 

1 

2.3305 

1.8689 

-1.0372 

0. 

0. 

2 

1.8689 

-1.0372 

2.3305 

0. 

0. 

3 

1.0372 

-2.3305 

-1.8689 

0. 

0. 

MASS  MATRIX  DIAGONAL: 

213  l.OOOOOOOOOOOOOD-01 
312  l.OOOOOOOOOOOOOD-01 
411  l.OOOOOOOOOOOOOD-01 


To  run  the  transient  response  of  the  structure,  a  forcing  function  or  initial  condition 
would  be  needed  to  excite  the  structure.  An  initial  condition  would  be  added  to  the 
finite  element  file.  A  forcing  function  must  be  added  to  f  orces.f  with  a  new  ID  number, 
then  this  ntimber  given  as  interactive  input.  In  this  case,  an  initial  displacement  acts 
on  the  second  degree  of  freedom,  which  is  defined  in  the  finite  element  model  input  file. 
The  file  INPjspringl  documents  the  interactive  inputs  used  in  the  tremsient  analysis. 

File:  IHP_springl 

-3 

n 

*  ACSIS  input  file,tvo  lines  above  are 

*  analysis  type  and  save  input  file.  Do 

*  not  change  them  by  editing  this  file. 

*  Finite  element  input  file? (filename) 

FEH.spring 

*  Initial,  final,  step  size? 

0.00000000  1.00000000  0.00100000 

*  Forcing  function, scale  f ,  damping  a,b? 

0  0.000000  0.00000000  0.00002000 

*  Output  file  name? (filename) 

OUT.spring 

*  Number  of  displacement  outputs? 

1 

3  1 

*  Nmnber  of  velocity  outputs? 
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0 

*  S«ad  output  OTory  hov  nany  stops? 

1 

«  Sond  auinutioa  output? (y  or  &} 


In  addition  to  the  finite  element  file,  the  interactive  input,  and  an  excitation,  CSI 
simulation  requires  a  controller  definition  file.  A  full  state  feedback  controller  for  the 
truss  structure  is  defined  in  COVjspring. 

File:  COH_spring 

»ACT 

1 

BMAT 

3  1  1  1.0 
FIGAIS 

• 

2  1  1 

193.31415000000 

3  11 

1574.6315000000 

4  11 
F2GAI» 

-1669.0460000000 

2  1  1 

20.774256000000 

3  11 

27.790403000000 

4  11 
NSEV 

1 

HVMAT 

3  1  1  1.0 
LIGAIV 

10.780212000000 

2  1  1 

8.7928909000000D-02 

3  11 

-4.8807901000000D-02 

4  11 

L2GAIH 

3.0102735000000D-03 

2  11 

1.0380932000000D-01 

3  11 

6.1410130000000 

4  11 
EITD 

-3.0608725000000 

Then  if  acsis.oxo  is  nin  interactively  and  the  input  is  saved,  the  file  INP_spring2  cein 
be  produced.  The  file  could  be  edited  to  change  the  input  files,  the  output  file,  the 
forcing  function  ID,  the  length  of  simulation,  control-on  time,  etc.  Then  to  nin  it  again, 
type  acsi8.oze<IHP-spring2>  scr  k .  The  scr  is  a  scratch  file  which  will  store  the  . 
screen  output. 


File:  IHP_spring2 


*  ACSIS  input  fll«,tvo  lin«s  above  are 
e  analysis  type  and  save  input  file.  Do 

*  not  change  them  by  editing  this  file. 

«  Finite  element  input  file? (filename) 

FEM.spring 

<0  Controller  file  name?  (filename) 

COH.spring 

*  Please  input  type  of  control: 

3 

e  Initial, final I control'on, step  size? 

0.00000000  1.00000000  0.10000000  0.00100000 

*  Forcing  ftinct ion, scale  f,  damping  a,b? 

0  0.000000  0.00000000  0.00002000 

*  Phase  lag  fiz?(y  or  n) 
n 

*  Gain  scale  factors  (4  total)? 

1.00000000  1.00000000  1.00000000  1.00000000 

*  Output  file  name? (filename) 

OUT. spring 

*  Humber  of  displacement  outputs? 

1 

3  1 

*  Humber  of  velocity  outputs? 

0 

*  Send  output  every  how  many  steps? 

1 

*  Send  animation  output? (y  or  n) 
n 
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APPENDIX  B 


Matlab  Procedtire  and  Scripts 
for  Controller  and  Kalman  Filter 
Gain  Designs 
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Introduction 


In  order  to  retain  simplicity  in  the  ACSIS  code  for  parallel  implementation  purposes, 
no  control  system  design  algorithms  were  included.  Instead,  using  modal  data  out¬ 
put  from  the  agenmode  analysis  module  of  ACSIS,  a  procedure  was  developed  using 
the  Pro-Matlab  and  its  C<^trol  System  Toolbox,  which  includes  algorithm  scripts  for 
optimal  control  solutions  via  the  solution  of  an  algebraic  Ricatti  equation.  In  order  to 
accomodate  large  order  dynamical  systems,  the  design  is  accomplished  in  the  uncoupled 
normal  modes  domain,  using  the  available  lowest  eigenmodes  from  ACSIS. 

The  procedure  begins  by  copying  and  editing  the  mode  data  output  from  ACSIS  (see 
the  listing  for  EIG  jipring  in  Appendix  A)  into  readable  vanables  for  input  to  Matlab. 
The  typical  approach  was  to  create  one  file  as  a  Matlab  script  (i.e.  a  ”  .n”  file),  with 
the  eigenvalues,  eigenvectors,  and  mass/dof  data  from  ACSIS  at  the  begiiming,  followed 
by  actuator  and  sensor  influence  matrices  (related  to  the  physical  degrees  of  freedom), 
the  objective  function  weighting  matrices,  and  the  function  which  calls  other  Matlab 
scripts  to  determine  the  solution.  An  example  of  the  above  input  for  the  spring  problem 
described  in  Appendix  A  is  in  file  EIG.spring.m,  which  is  listed  below.  Compare  this 
the  the  ACSIS  mode  data  output  shown  in  Appendix  A  to  see  how  the  editing  was 
accomplished,  and  the  additional  control  design  data  added 


File:  EIGjspring.m 


laa  «  C  1980.6 
15550. 

32470.  ]; 


vl»Cl 

2.3305 

1.8689 

-1.0372 

0. 

0. 

2 

1.8689 

-1.0372 

2.3305 

0. 

0. 

3 

1.0372 

-2.3305 

-1.8689 

0. 

0. 

m-C  2  1  3  l.OOOOOOOOOOOOCD-01 

312  l.OOOOOOOOOOOOOD-01 

411  l.OOOOOOOOOOOOOD-01] : 

t*Cvl(; ,2:4)3 ; 
qb«z«ros(3,l) ; 
qb(2,l)»1.0; 
hd"z«ros(l,3> ; 
hv*z«ros(l,3) ; 
hv(l,2)«1.0; 
qv«Cl;.5;.l3; 
q«diag([qv;qv]); 
r«.0001**y*(l); 

[ri,f23«alqr(laj»,t,n,qb,q,r,3)  ;• 
qv*Cl;l;l3; 
q«diag<Cqv;qv3); 
r>100*«y«(l) ; 

[kl,k2]«nkf (laa,t,a,hd,hv,q,r,3) ; 
save  flout  fl  /ascii 
sava  12out  f2  /ascii 
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klottt  ki  /•Mcii 
MW  k2ottt  k2  /uieii 


The  scripts  alqr  .■  and  akf .«  were  written  to  accept  as  mput  the  vector  of  eigenvalues, 
the  eigenvector  matrix  (orthogonal  vectors  stored  in  columns),  a  matrix  of  node,  com¬ 
ponent,  di0.f,  mass  data,  and  the  actuator  ^or  sensor)  influence  matrix  and  weighting 
matrices.  The  scripts  output  the  gain  results  in  four-column  arrays,  with  one  gain  per 
row,  and  the  corresonding  node  number,  displacement  component,  and  actuator  (or 
sensor)  identification.  The  top-level  problem  script  (listed  above)  then  saves  the  output 
in  external  files  and  the  analysis  is  complete.  The  design  scripts  (listed  below)  also 
include  checks  on  controllability  and  observability  of  the  system  based  on  the  modal 
data  and  influence  matrices  defined,  and  produce  plots  of  the  closed  loop  poles  resulting 
from  the  gain  design.  This  aids  the  analyst  in  assessing  the  expected  performance  (and 
stability)  of  the  exact  system  before  moving  the  data  back  to  ACSIS  for  simulation. 
The  script  contrank.a  finds  the  rank  of  the  controllability  matrix  through  iterative 
rank  calculations  of  submatrices  so  as  to  avoid  the  illconditioning  experienced  in  the 
'  full  matrix.  This  is  both  faster  and  more  accmate  for  determining  whether  a  particular 
actuator  placement  has  full  control  of  the  included  structtiral  modes. 


File:  nlqr.n 


f  unct  ion  CF  lout ,  F2out]  ■olqr  (1  «a ,  t ,  m ,  qb  A  >  R » OAods ) 

X 

X  Controller  gain  design  for  second-order 
X  structural  systea  via  given  eigenmodes. 

X  Gains  are  transformed  to  be  coefficents 
X  of  structural  variables  (disp, velocity) ; 

X  i.e.  plant  is  second-order,  of  size  ndof . 

X 

X  Arguments : 

X 

X  lam:  vector  of  eigenvalues  (nmode  x  1) 

X  t:  matrix  of  eigenvctors  (ndof  x  nmode) 

X  m:  BMSS  diagonal  and  dof  mapping  info  (ndof  x  4) 

X  qb:  actuator  position  influence  matrix  (nact  x  ndof) 

X  Q:  optimal  design  state  weighting  matrix  (2*nmode  x  2*nfflode) 
X  R:  optimal  design  feedbk  weight,  matrix  (nact  x  nact) 

X 

X  Flout:  FI  gain  matrix  for  2nd-order  plant 
X  F2out :  F2  gain  matrix  for  2nd-order  plant 
X 

X  Written  by  K.F.  Alvin 
X 

format  short  e 
nmodmax«length(lam) ; 

[ndof ,nact] ■size(qb) : 

X 

X  Variables : 

X  mass:  mass  matrix 
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X  A:  atat*  transition  matrix 

X  B:  actuator  ixifluanca  matrix 

X  Q:  control  gain  matrix 

X 

mastd(m( : ,3))*m( : ,4) ; 

massadiag(maasd} ; 

A«Cxaros(naeda)  ,ajaCnmoda}  :*l*diag(lam(l:iuBoda))  ,zaros(nmoda)3 ; 
Amax^CzarosCnmodmax)  .oyaCnmoda^)  ;*i*diag(lam)  .zaroaCnmodmax)]  ; 
B«Czsros(nnoda,naet)  :t( : .  i  :nB»da>  *qb] ; 

Bmax*  [zeros  (nmodmax.naet)  it*aqb] ; 

dispC ’Number  of  structural  modes  and  actuators  used:*) 

disp ( Cnmode .nact] } 

disp<’Rank  of  the  controllability  matrix:*} 
dispCcontrankCA.B) ) 

disp  (’Determining  controller  gains  for  given  system. . .  ’) 

G«lqr(A,B,q.R); 

«maz*l . l*max(sqrt (lam) ) : 

axis  (  ['■max ,  max  t -max ,  vmax]  ) ; 

plot(eig(A-B*Q),’*’) 

grid 

title( ’Roots  of  controlled  system’) 

bold 

pause 

X 

X  partition  gain  matrix 
X 

G1*G(: ,l:nmode): 

G2»G ( :  ,nmode^  1 : nmodo'tnmode) ; 

X 

X  Transform  re8"ltant  gain  matrices  for  use  in 
X  partitioned  csi  algorithm  using  second-order 
X  structure (plant)  equations. 

X 

disp  (’Mapping  gains  back  to  physical  domain...’) 
f  l*Gl*t(:  ,l:zuBode)  ’mass; 
f2*G2*t(: ,l:naods)’*na8s; 

X 

X  find  modal  damping  ratios  of  controller  for  calulated  gains: 

X 

Gmax«[fl*t,f2*t] ; 
lambdaaeig(Amax-BmaxeGmaz) ; 
plot (lambda, ’*’) 
pause 

nfreqasqrt(imag  (lambda)  .'2  *  real  (lambda)  ."2) ; 
mdamp*-real  (lambda)  ./nfreq; 

disp  (’Resultant  modal  damping  ratios  for  controller:’) 
disp(C’  Damping  ’,*  Damped  Freq  (rad/s)  ’]) 
disp  (  D&dasqp  ,nf  req .  esqrt  ( 1-mdamp .  *2) ,  lambda] ) 
bdampmax(-2emdaap./nfreq) ; 

disp  (’Estimated  minimum  stiffness  damping  coefficient  necessary') 
disp(*^to  stabilize  residual  SMdes  due  to  gain  roundoff  accumulation:’) 
di8p(bdanp) 

disp  (’Writing  gains  in  node  correspondence  output  form. . .  ’) 
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Flettt^xtrosC&aetK&dof ,4) ; 

F2ottt«x«ros (a«et*ndof • 4) ; 
for  i<*l:noet; 
kBi&ad'Dondof^^l ; 
kaax«i*Bdof ; 

Flout(kBin:bMZ,  »li2) ,l*o&«s(ndof  ,1)  ,flCi,m(:  ,3)) ']  ; 

F2out(kal2i:]aMZ.:)«'CB(:«l:2)tl*onoa<xxdof  ,l},f2Cl»a(;  ,3))*3 : 
•nd{ 

disp(*Finish«d  alqr*) 


File:  akf  .a 


f\mctionD.lottt  ,I.2out]  aakf  (laa,t  ,a,hd»hr,Q  ,R,nmod«) 

X 

X  Kalaux  filter  dosign  for  a«cond**ordor 
X  atructural  ayataa  rla  given  eigeaaodea 
X  end  tranaforaed  to  independent 
X  diapleeeaent/gen.  aoaentua  variable 
X  caating  for  partitioned  cai  tranaient 
-X  analyaia.  See  Belvin/Park  paper  for 
X  filter  variable  definitiona. 

X 

X  Arguaenta : 

X 

X  laa:  vector  of  eigenvaluea  (naode  x  1) 

X  t:  aatrix  of  eigenvetora  (ndof  x  naode) 

X'  a:  aaaa  diagonal  and  dof  aapping  info  (ndof  x  4) 

X  hd:  aenaor  poaition  influence  aatrix  (nsan  x  ndof) 

X  by:  velocity  poaition  influence  aatrix  (nsan  x  ndof) 

X  Q:  optiaal  deaign  atate  weighting  aatrix  (2*naode  x  2*naode) 
X  R:  optiaal  deaign  feedbk  weight,  aatrix  (nsan  x  nsen) 

X 

X  Llout:  LI  gain  aatrix  for  2nd-order  filter 
X  L2out:  L2  gain  aatrix  for  2nd*'order  filter 

X 

X  Written  by  K.F.  Alvin 
X 

foraat  abort  e 
naodaaxslength(laa) ; 

Cnaen  ,ndof  ]  •aiza  (hd) ; 

X 

X  Variablea: 

X  aaaa:  aaaa  aatrix 
X  A:  atate  tranaition  aatrix 

X  G:  noiae  influence  matrix 

X  C:  output  influence  aatrix 

X  K:  filter  gain  aatrix 

X 

aa8ad(a(: ,3))aa( :  ,4)  i 
aaaa«diag(aaaad) ; 

A*  [zeroa  (naode  ),  eye  (naode)  ;-ladiag(laa(l:nBode)) , zeros  (naode)]  ; 
Aaax* [zeros (naodaax)  ,eye(naodaax)  i^iediagdea)  ,zeros(naodBax)]  ; 
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G««y«CsiBod«'t>xunod«) ; 

C*Chd4>t<:  ,l:aBod«>  .hvotC:  ,l:Qfflod«)] ; 

CBax«>Did*t,hv*t3 ; 

diap('MuBb«r  of  structural  nodss  and  nansors  usad:*) 
disp(  DuBoda  .nsan] ) 

disp(*Rank  of  tha  obsarrabillty  matrix:  *) 
ditp(contran]c(A*  ,C*)) 

dispC’Datarainiug  filtar  gains  for  givan  syntam. ..*) 
K«lqaa,G,C,Q,R); 

X 

X  partition  gain  matrix 
X 

Kl«K<l:nmoda, : 

K2«K(nmoda**’l  tnmoda'fnmoda , : ) ; 

Kmax*CKl;zarosCnmodmax*‘nmoda,n8an)  :K2:zaros.(nmodmax-nmoda,nsen)] ; 

X 

X  find  modal  damping  ratios  of  filtar  for  calulatad  gains: 

X 

lambda**aig(Amax'-KmaxaCmax) : 

plot (lambda, ’+') 

hold 

pausa 

al«-raal (lambda) ; 
blaimag(lambda) ; 

di8p(’ Resultant  modal  damping  ratios  for  filter:*) 
disp(C’  Damping  *,*  Freq  (rad/s)  *]) 
diap(Cal./sqrt(al.'‘2+bl.‘‘2)  ,bl]; 

X 

X  Transform  resultant  ga:'ui  matrices  for  use  in 
X  partitioned  csi  algorithm  using  second-order 
X  Kalman  filter  approach. 

X 

disp( 'Mapping  ga^ns  back  to  physical  domain...') 
ll^t(: ,l:nmoda)eKl; 

12*ma8s*t(: ,l:nmoda)*K2; 

disp( 'Writing  gains  in  node  correspondence  output  form. . . ') 
Llout«zaros(nsan’)'ndof  ,4) ; 

L2out«zaro8(n8an*ndof ,4) ; 
for  i>l:n8an; 
kmin«(i-l)*ndof +1 ; 
kmax>i*ndof ; 

Llout(kmin:kmax, :)aCm(: ,1:2) ,i*one3(ndof ,1) ,ll(m(: ,3) ,i)] ; 
L2out(kmin:kmax,  :)«Cm(:  ,1:2)  ,i*one8(ndof  ,1)  ,12(m(:  ,3)  ,i)]  ; 
and; 

disp( 'Finished  mkf ' ) 


File:  contrank.m 


function  maxrank*contrank(a,b) 
maxrank>0 ; 

Cn8tata,nact] «8ize(b) ; 
i*0; 
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lUitab; 

navrankarankCiMt) ; 
vhil*  n««rank  >  nazrask 
aiazrank«na«rank ; 

■at* [iMt .  Ca*i)  *b]  i 
aa«rank*rank(aat) ; 
if  na«raiik**nstata 
Bazrank*&avrank ; 
and 

and 

Unfortunately,  the  external  files  created  from  Matlab  with  the  gain  results  are  written 
completely  in  terms  of  real  numbers,  whereas  the  first  three  columns  are  actually  to  be 
read  by  ACSIS  as  integers  (they  are  used  as  indices).  A  separate  utility  was  written  to 
convert  the  format  of  these  files;  the  source  code  is  listed  below.  On  Unix  systems,  the 
user  simply  assigns  the  standard  input  to  be  the  current  data  file  created  by  Matlab, 
and  gives  another  file  name  for  the  standard  output.  The  code  is  basically  just  a  filter  to 
change  the  three  columns  of  indices  to  integers.  The  output  can  then  be  pasted  directly 
into  the  control  definition  file  used  by  ACSIS. 

File:  convcont.f 

program  convcont 

paramatar  (NHAX«100000} 
raal*8  f(NMAX),v(4) 

intagar  noda(NMAZ) ,dof (NHAX) .act(NMAX) 
n«0 

100  raad  (*,*,arr»200,and*200)  <v(i),i»l,4) 
a»n+l 

noda (n) *int (vC 1 ) ) 
dofCn)  ■int(v(2)) 
actCn)  ■intCv(3}) 
f(n)  ■v(4) 
goto  100 

200  do  300  i*l,n 

print  «,  noda(i) ,dof (i) ,act(i) ,f (i) 

300  continua 


and 


APPENDIX  C 


Stability  Analysis  of  a 
CSI  Partitioned  Simulation 
Algorithm  with  State  Estimator 


The  equation  of  the  open-loop  plant  without  passive  damping  in  modal  second-order 
form  is 


q  -I-  (J^q  =  u 


The  controller  uses  a  second-order  observer  to  estimate  the  plant  state,  along  with  a 
full-state  feedback  control  gain  design. 

u  =  -  {nu^p  +  Cojp) 
p  +  u^p=^u  +  (‘y 
'r  =  z-‘P 
z-q 

where  q  and  p  are  the  plant  and  estimator  states,  respectively,  u  is  the  control  force,  7 
is  the  state  estimation  error,  z  is  the  sensor  output,  and  7,  Cj  C  ^'^e  gain  coefficients  for 
position  and  velocity  feedback,  and  the  estimator  filter. 

The  partitioned  analysis  procedure  uses  a  stabilized  form  of  the  control  law  and  esti¬ 
mation  error  determination  to  reduce  inaccuracies  associated  with  the  extrapolation  of 
Vciriables  in  the  controller  force  prediction.  A  first-order  filtering  is  achieved  by  taking 
the  time  derivative  of  (2a,c), 

ti  =  -r)u^p  -  Cwp 
^  =  z^p 

and  then  embedding  the  equations  of  motion  through  substitution  for  p.  This  leads 
to  the  following  two  coupled,  first-order  differential  equations  for  the  prediction  of  the 
control  force  u  and  state  error  7. 


r«\  fCw  _ /0l  ,  /CwM  _ 

Ul+li 


Time  discretization  of  (4)  using  m  implicit  midpoint  rule  leads  to  the  following  coupled 
difference  equation: 


1  +  S^iO  1  /  \  /  0  \  /  SCU}^  -  \  n-f-i  /  \  -n 


where  S  =  half-step  size  =  Solving  this  equation  reqviires  knowledge  of  the  plant  (to 
obtain  sensor  output)  md  observer  states.  These  values  are  extrapolated  as: 

pr;=i.”+^  (6) 

n+4  .n+4  .,4 

Zp  ^  =qp  ^  =q^ 
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Using  these  equations  to  obtain  and  7"+^  allows  the  plant  and  observer  equations 
to  be  solved  independently.  Midpoint  time  integration  of  (1)  and  (2b)  leads  to  the 
following  equations: 

(1  +  5V)  =*  +  p"  +  Sp^  +  ^2^7**+^ 

=  I  (5"+*  -  q" 

p«+J  =  i(p«+l-p.) 

9"+^  =  29“+^  -  9" 
p^+i  =s  29“+^  -  9” 

9"+^  =  29”+^  -  9” 
p’*+^  =  29"+i  -  9" 


Computational  stability  of  the  modal  form  of  the  CSI  partitioned  equations  of  motion 
using  the  aforementioned  time  discretization  can  be  assessed  by  seeking  a  nontrivial 
solution  of 


{P 


^n+l 

jrt+l 

^n+1 

n+1 


,n  ^ 


An 


P”; 


(8) 


such  that 


W<i 


(9) 


for  stability.  Subtituting  (8)  into  (5-7),  we  obtain 

Jx  =  0 


(10) 


where 


Xi  = 

[p^* 

pn+§ 

p«+^ 

P" 

P”1 

X2  = 

7"+i 

9»+i 

9"+§ 

9" 

r] 

J  = 


Jii  J12 

J21  J22 
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(11) 


1 

0 

0 

0  -1 

-S 

—  Siuf^) 

(1  +  ^Cw) 

0 

0  0 

Cw 

0 

-6^ 

(1  +  S^iv^) 

0-1  -s 

0 

0 

1  i 

0 

0 

0 

-2 

o 

+ 

-< 

0 

0 

0 

-2  0 

A  + 1 

‘0  0  0  0  0  O' 

0  6C(u  0  0  0  0 

0  0  0  0  0 

0  0  0  0  0 

0  0  0  0  0  0 

0  0  0  0  0  0 


■  0  0  0  0  0  O' 

6  0  0  0  1 

0  -^2  0  0  0  0 

0  0  0  0  0  0 

0  0  0  0  0  0 

0  0  0  0  0  0 


1 

0 

0 

0 

0 

-1 

-1 

(1  +  ^0 

0 

0 

0 

0 

0 

0 

(l  +  «"u;2) 

0 

-1 

-s 

0 

0 

1 

-J 

1 

1 

s 

0 

0 

0 

-2 

0 

A  +  1 

0 

0 

0 

0 

-2 

0 

A  -f"  1 

A  nontrivial  solution  to  (10)  is  found  from 

det  J  =  0 


which  leads  to  the  characteristic  equation 

((1  -  Si)  (1  +  -  S^Tju^)  ■¥Si{l  +  SW))z^ 

+  (5Cw  (1  -  Si)  +  (1  +  S^iw^  -  SV))z^ 

((1  —  6^)  (S^u^  +  S^rju^)  +  S^u^  (l  +  S^iu^  —  S'^iju/'^) 

+Si  (Siu  +  S^u)^  +  S^u^))z^ 
{S'^uP'  {Si(jj)  +  Si  [S'^uP  +  S"^ri(jp))z 

+S^u;^  +  S^r]u^)  =  0 


(12) 


(13) 


(14) 


(15) 


(16) 


(17) 


where 
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A=: 


1  +  2 


|A|<1 


Re{z)  <  0 


(18) 


Thus,  a  test  of  the  polynomial  equation  for  possible  positive  real  roots  by  the  Eouth- 
Hurwitz  criterion  indicates  that  the  partitioned  approach  as  applied  to  the  modal  equa¬ 
tions  give  a  computationally  stable  solution  for  no  velocity  feedback  C  ~  0  provided 


h< 


(19) 


(20) 
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APPENDIX  D 


ACSIS  Source  Code 
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File:  Makefile 


li 

[ 


.SUFFIXES:  .i  .o 
FFUaS  > 


Xortru  -e  SCFFLAGS)  i*.i 


aeait.« 

aesiaont.o 

addstf .0 

baaaSd.o 

foreaa.o 

input. 0 

pavaal.o 

prop! am.  0 

profila.o 

raad.o 

aolvar.o 

nopblng.o 

sarovaet.o 

lu.o 

prapeon.o 

control . 0 

aacordor.o 

aanaura . o 

aigans.o 

aingaig.o 

nnimottt.o 

atlXirc.o 

aatiXvm.o 

ronna.o 

kfilttr.o 


acaia.«x«:  l(OBJS) 

lortraa  -o  aeaia.ixa  )(FFLAGS)  $(08JS) 


\ 

\ 

\ 

\ 

\ 

\ 

\ 

\ 


File:  shared. inc 

c 

c  - 

c 

C  aharad.i&c  (ACSIS  databaaa) 
C 

C  - 

c 

c 

C  Argnnant  daXiaitiona: 


C 

ndanp: 

Rajlaigh  dnaping  coafiiciant  alpha 

C 

b: 

actuator  location  satrix  (packed  storaga) 

C 

brov: 

ro«  nuabar  of  corraaponding  raal  valua  in  b 

C 

bcol: 

coluam  nuabar  of  corraaonding  raal  valua  in  b 

C 

bvnl: 

nuabar  of  nonzaro  valuaa  in  b 

C 

bdnnp: 

Rajlaigh  dashing  coafficiant  bata 

C 

coniilo: 

controller  input  fila  naaa 

C 

contjpa : 

id  for  tjpa  of  control 

C 

coxyz : 

arraj  of  tha  x,j,  and  z  coaponanta  of  each  node 

C 

delta: 

ona-half  tiaa  atop 

C 

dolaq: 

ona-half  tiaa  atap  aquarad 

C 

ac: 

control  prediction  integration  coafficiant  matrix 

C 

aauit: 

array  of  alaaant  aatarial  typos 

C 

ao: 

obsorvar  construct  matrix  S  in  vector  fora 

C 

aprop: 

array  of  aloaant  property  typos 

C 

as: 

structure  construct  matrix  S  (N'fdaltaaD'^’dolsqaX) 

C 

atppa; 

array  of  alaaant  typas 

c 

alnum: 

array  of  alaaant  nuabors  for  domain  dacoaposition 

c 

f: 

vactor  of  applied  forces 

c 

il: 

control  gain  matrix 
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C  fa:  eoBtrol  f«la  aatrix 

C  fMfila:  fiait*  alwiMt  input  filu  ana* 

C  foreuld:  iduatlfleatiea  aaabur  of  foreiag  fuaetioa 

C  fUMia:  state  eorrsctioa  feres 

C  |e:  BBS  voeter  for  eeatrel  prsdietiea  Mdule 

C  fk:  KBS  voeter  for  Xalaaa  filter  Maeataa  oqa 

C  |e:  KBS  vector  for  observer  aodale 

C  fs:  KBS  vector  for  structure  aodule 

C  b:  tiae  step  siao 

C  bd:  displaeeaeat  seasor  loeatiea  aatriz  (packed  storage) 

C  kdrev:  rov  auaber  of  eerrespoadiag  real  value  ia  kd 

C  kdeol:  eoluaa  auaber  of  cerresoadiag  real  value  in  kd 

C  kdval:  auaber  of  aoaaero  values  in  kd 

C  kv:  velocity  seasor  loeatiea  aatriz  (packed  storage) 

C  kvrov:  rov  auaber  of  eorrespoadiag  real  value  ia  kv 

C  kveol:  eoluaa  auaber  of  eorresoadiag  real  value  in  kv 

C  kwal:  auaber  of  aoaaero  values  la  kv 

C  id:  OOF  aappiag  array:  id(eoap,Bode  •)efilobal  DOF  t 

C  iz:  array  of  elaaant  eonaeetivity  and  orientation 

C  inertia:  array  of  eoaeontrated  inertias  or  lumped  masses 

C  jdiag:  array  of  diagonal  elemeat  addresses 

C  11:  State  estiaator  filter  gain  aatriz 

C  12:  State  estiaator  filter  gain  matrix 

C  mask: 

C  mass:  mass  matrix  R  in  reduced  vector  fora 

C  mat:  array  of  different  materials 

C  mien:  length  of  global  matrices  in  profile  vector  storage 

C  nact:  actual  nuaber  of  actuators 

C  ncsi:  actual  nuaber  of  actuators  and  sensors 

C  ndisout:  nuaber  of  displaeeaeat  results  to  output 

C  adof:  actual  auaber  of  degrees  of  freedom' 

C  adoaaia:  actual  auaber  of  eleaent  domains  (for  doa.  decoap.) 

C  nel:  actual  nuaber  of  eleaents 

C  neld:  array  of  auaber  of  elements  in  each  domain 

C  nap;  actual  nuaber  of  nodes 

C  asea:  actual  nuaber  of  sensors 

C  nvelout:  nuaber  of  velocity  results  to  output 

C  nolag:  logical  flag  to  signal  corrector  loop  in  moasurement 

C  ontfile:  output  file  naae 

C  outlabel:  array  of  output  data  requested 

C  pin:  array  of  eleaent  pin  release  codes 

C  pivot:  Coluu  pivoting  info  froa  FACTA 

C  prop:  array  of  different  properties 

C  q:  geaeralized  displaeeaeat  vector 

C  qO:  initial  displacoaont  condition 

C  qalpka:  gain  scale  factor  for  fl 

C  qalpkao:  gain  scale  factor  for  11 

C  qbeta:  gain  scale  factor  for  f2 

C  qbetao:  gain  scale  factor  for  12 

C  qdot:  velocity  vector 

C  qdotO:  initial  velocity  condition 

C  qe:  state  estiaator  displaceaent  vector 

C  qedot:  state  estiaator  velocity  vector 

C  r:  Solution  vector  of  control  module  -{n.gaaBa} 

C  scalef:  Scaling  factor  for  forcing  function 

C  stiff:  stiffness  aatriz  K  in  reduced  vector  fora 

C  tO:  initial  tiae 

C  tc  coatrol-on  tiae 

C  tf:  final  tiae 
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ooooonnonocio 


v«eter  of  eoatrol  foreoo 


a: 


PoroMtor  dofiaitioBO 
MAZiCT:  MX.  •  of  aetMtora 

lUZCSZ:  MX.  eeiid)iBad  t  of  aetaatora  aad  aoaaora 

BAIOAT:  aax.  •  of  aatarlala  aad  propoxtiaa 

lAZOOF:  aMx.  •  of  dograoa  of  froodma 

XAXOOM:  aax.  •  of  daeoqpoaitioa  doaaiaa 

MAZBLB:  aax.  •  of  olaaoata 

MAZHLBI:  aax.  laagtA  of  flobal  voetora  la  radacad  fora 
NAZIOOB:  aax.  •  of  aodaa 


paraaatar(RAXOOr>3O0O.  KAZACTaSO.  KAZCSZ-IOO) 
pazaaotar(llAZI0DZ>1000.  1IAZSLE>3000,  XAZOATbIOO) 
paraaatardUZXLZIaaoOOOO,  IIAZ00N«60.  ]IAZ1IZV«300} 

roal*8  tO,tf ,te,h,dalta,dolaq,qalpIia,qbata,qalphao,qbatao 
raal*8  q(KAZDOF) ,qdot(MAZ00F} .qa(HAZCOF) .qadot(KAXDOF} 
roal«8  a(NAZACT)  .gaaaadUZACT) .f (KAZDOF) .r(NAZCSI} 
roal*8  oa(KAZXLZI) .aoCMAZXtiS) .ae(NAZCSZ.XAZCSI) 
raal'kA  ga(MAZOOF)  .go(KAZl>0F}  ,ge(MAZCSI)  .acalaf  ,pa(MAZD0F) 
raal*8  aaaa(XAZKLZH).atif (RAZl(L£V).adaBp.bdanp.gk(NAXDOF) 
raal«8  00x72(3 .KAZROOE) ,aat ( 6 .MAZOAT) tprop( 10 ,MAZDAT) 
raal*8  qO(8,NAZVOOE) ,qdotO(«.RAXIOOE) .iaartia(6,MAXN0DE) 
roal«8  b(MAXHZV),lid(NAXIZV),hv(IUXirZV),aatifa( 78,500) 
raal*8  f KKAXACT .RAXOOF)  ,f2(MAZACT,MAX00F) 
raal«8  ll(MAXOOF.HAZACT) .UCHAXOOF.XAZACT) 
iatagar  at7pa(IIAX£LE),iz(4,lUZ£LE).aaat(IIAXELB).forcaid 
iatagar  apropCMAXEU) .pia(6,XAXEL£) .id(6.1UXN01>E) 
iatagar  Baak(IUZXODE) ,coat7pa.bro*(XAXVZV),beol(MAXMZV) 
iatagar  hdro«(XAX]IZV)  .kdeoKXAXXZV)  ,bvroa(RAXNZV) 
iatagar  bvcol(XAXXZV) ,bTal,kdval,kvval 

iatagar  adof ,oaet,ataa,aesi,alaa,jdiag(XAXDOF),nnp,nal,naig 
iatagar  aaldCXAXOOX) ,alaui(XAX£LE,XAXOOX) .aldoaCXAXELE) .ndomain 
iatagar  oatlabal(40} ,adiaoot,avaloat,pivot(XAZCSI) 
iatagar  iadjcjCXAXXLEK) ,ieooat(XAXH00E«l) .pam(XAXNODE) 
iatagar  zla(XAXXOOE) 
logical  aaiaata,aolag 

cliaractar<*32  f aaf ila ,  coaf ila  ,oatf ila  ,aainf ila 

COXXOK  /FILES/  f aafila, coaf ila, outfila.oatlabal.adiaout, 
avaloat  ,aaiaf  ila,uiaata,aolag 
COXXOX  /TIXEES/  t0,tf ,te,h,dalta,dalaq 
COXXOI  /STATES/  q,qdot,qa,qadot.u,gan8a,f •r,pa 
COXXOX  /FEXDAT/  ■aas,atif ,adaBp,bdaBp,coz7Z,Biat,prop,qO,qdotO, 
iaartia.acalaf 

COXXOI  /UTEOR/  aa,ao,ac,ga,go,gc,gk, pivot 

COXXOX  /OIXEXS/  adof ,aact,afaa, aeai,alaa,jdiag, nap, aal,noig 

COXXOX  /COXDAT/  b.kd.bv.f ^,f2.11,12. 

qalpka , qbata , qalpbao , qba t ao 
COXXOX  /ELEOOX/  astifB.adoaaia.nold.alana.aldon 
COXXOX  /IXTGER/  foreai4,at7pa,iz,aaat,oprop,pin,id,ma8k, 
coatypa  ,broo  ,bcol  ,lidro«  ,hdcol ,  hvroo  ,hvcol , 
bval thdval ,hVTal 

COXXOX  /RESEQX/  iadjc7,icoBat,para,xla 


File:  acsis.f 
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C«Progrui  ACSXS 

C>P«rpea«  icealaratad  CSX  Slaalatiea 
CaAathor  X.  AlTla 
C«Data  Xaj  1990 
CaBloek  Fortran 


c— 

C 

1 

1 

» 

1 

1 

1 

1 

1 

1 

1 

t 

1 

1 

1 

1 

1 

• 

1 

1 

1 

1 

J 

1 

•  1 
1 
1 
1 
I 
1 
1 
1 

C 

C 

C 

prograa  ACSXS 

c 

c 

Parposa:  2ad  Ordar  Aeealaratad 

CSX  Siaalatioa 

c 

progrut  ACSXS 
C  CET  SHARED  DATA  FILE 
inclnda  ’aharad.iae* 

C  LOCAL  VARIABLES 

raal»8  t.rCHAXACT) 
iatagar  a.airua«7pa,oatikip 
C  LOGIC 

call  IVPDTCraatypa.oattkip) 

ii  (raatypa)  100,300,300 

C  EIGEXHODE  AHALTSIS 

100  coatiaaa 

call  PREPFEM 
call  EIOEHS 
goto  999 

C  CSX  SIHOUTIOX 

300  call  PREPFEM 

call  PREPCOI 

a  ■  0 

a  •  0 

priat  «,'Fiaishad  Praproeaaaiag  .  .  .  startiag  liBnlatioa' 
prlat  *,'Tiaa  ■',t0 
CALL  ACSISOUT(tO) 

do  360  tstO,t£,k 

call  F0RCES(t4'h/3) 

C  Pradiet  CSI  coapliag  Tariablas  a  aad  gaarnui 
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n  n  o  n  o  n  n 


if  (t  .g*.  te)  thra 
call  niSUEKi) 
call  COraU)L(i) 
if  (aolag)  than 
eaU  M0PRU0(s} 
call  COimiOL(a) 
aadif 
aadif 

C  Stnetara  and  obsarrar  aat  up  for  parallal  axaeation 

CVD$  dCALL 

do  275  i>1.2 

C  latagrata  Obaarrar  Equatioaa 

if  ((i  .aq.  i).aad.(t  .ga.  te))  thaa 
if  (coatjpa  .aq.  0)  tbaa 

call  SEC01U>EIl(aaaa ,  at  if ,  adaaq> ,  bdaaip .  f ,  go ,  ao ,  qa ,  qadot , 
dalta,dalaq, jdiag.adof iMiZOOF) 
alaaif  (eoatppa  .aq.  1)  tbaa 
call  XFZLTEE 
aadif 

C  latagrata  Stractara  Eqaatioaa 
alaaif  (i  .aq.  2)  tbaa 

call  SEC0R0ER(aaaa .atif ,adaap,bdaBp,f ,ga , ta ,q,qdot , 
dalta , dalaq, jdiag , adof ,MiXD0F) 

aadif 

275  eoatiaaa 

C  PRirr  TIKE  EACH  100  itaratioaa 

a  ■  a  ♦  1 

■  >  ■  1 

if  (a  .ga.  100)  tbaa 
priat  *,  'Ti«a  ■  ’,t*b 
a  a  0 
aadif 

if  (■  .ga.  oatabip)  tbaa 
call  ACSISO(rr(t>b) 

*rita(24 , ’ (40f 12. 8) ' )  t , (z(i) ,i*i laaaa) 

m  «  0 

aadif 

250  eoatiaaa 
goto  999 

C  TRAHSIEMT  RESPOMSE 
300  call  PREFFEK 

a  s  0 

B  •  0 

priat  a,*Fiaiabod  Praprocassiag  .  .  .  atartiag  siaulatioa' 
priat  «,'Tiaa  •  *,t0 
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'  call  ACSlSOOTCtO) 
do  3S0  totO,tf,h 
eaU  FORCUCt^h/a) 
call  zmoVSCTCst.adof) 

call  SSC0B0BR(aaio,otii.ada^^,bdaii9,f .is.oi.q.qdot, 
dolta,dolaq,  jdia(,adef ,MAXS0F} 

C  PRUT  TIME  EACH  100  itoratloas 

a  a  a  >  1 
m  •  m  *  1 

(a  .go.  100)  thoa 
priat  *,*Tlaa  ■  ’,t*h 
a  ■  0 
oadi2 

12  (■  .go.  oatoklp)  thoa 
call  ACSIS0nT(t4h) 

■  ■  0 

oadl2 

350  eoatlano 

999  stop 
oad 


File:  acsisout.f 


c>Moduio  Acsisonr 

CaParpoto  tfrlto  doolrod  output  2roa  ACSIS  2or  plotting,  otc. 

CaAuthor  K.  Altla 
C>Dato  Kay  1990 
CaBlock  Fortran 

C  - 

c 

C  Subroutlao  ACSISOUT 

C 

C  Purpoio: 

C  Thla  subroutlao  outputs  lomattod  dlsplacoBont  and  volocity 

C  rooults  at  a  givoa  tins  lor  plotting  tlao  historios.  Tho 

C  doslrod  output  varlablos  aro  do2iaod  In  outlaboK). 

C 

C  - - - 

c 

C  ArgUBonts 

C  t  -  tlao 

C 


■ubroutino  ACSISOOTCt) 

Ineludo  'oharod.lnc' 
roaloS  t 


49 


C  LOCAL  VAKIABLES 

iat«g«r  i 
C  LOGIC 

«ri«a(13 ,  *  (40f  12 . 8) ' }  t .  (qddCoatlabaKi^lO)  .ontlabald) } ) . 

.  i>l,adisottt} , (qdotddCoutlabald'fSO} .ontlabaKl't^GO})) , 

.  ial.aTalont) 

writ«(23,  •  (40112 . 8}  * )  t ,  (qaddCoatlabald^lO)  ,outlab«l(i) }) , 
.  isl,adiaoat),(q«dotdd(otttlab«ld'»30}»oatlab«ld'i‘20)}) , 

.  i>l,a7«lont) 

«rit«(2S , *  ^40112 . 8} ’ }  t ,  (ad) , !■! ,aaet ) , (gaaBa(i) , !>! , assn) 

il  (aaioata)  call  AMIXOUT(q,id,aap,t,lS) 

ratara 

aad 


File;  addstf.f 


C<Nodttla  AOOSTF 

CsPurpoaa  Asaaabla  Global  atillnasa  oatriz 
CsAutbor  abo  kaova 

CsUpdata  Jaanar7  1989,  by  E.  Pranoao 
CsBlock  Fortraa 

aabrout iaa  AOOSTF( ak ,Ia,bk,jdiag,aiaq) 


C+ - — - - - ^ - +C 

C  PURPOSE:  C 
C  THIS  SUBROUTINE  ASSEMBLES  THE  ELEMENT  STIFFNESS  MATRICES  C 
C  INTO  THE  COMPACTED  GLOBAL  STIFFNESS  VECTOR.  C 
C  C 
C  ARGUMENTS:  C 
C  ak  -  ELEMENT  STIFFNESS  MATRIX  C 
C  la  -  LOCATION  VECTOR  FOR  ELEMENT  STIFFNESS  MATRIX  C 
C  bk  •  COMPACTED  GLOBAL  STIFFNESS  VECTOR  C 
C  jdiag  -  VECTOR  OF  DIAGONAL  ELEMENT  ADDRESSES  C 
C  aaaq  -  NUMBER  OF  DEGREES  OF  FREEDOM  PER  ELEMENT  C 
C - C 


C  ARGUMENTS 

raal*8  akCaaaq.aaaq) .  bk(l) 
iatagar  laClS),  jdlagd) 

C  iatagar  lad8)7  jdiagCl),  aaaq 

C  LOCAL  ARGUMENTS 

iatagar  i,  j,  k,  1,  a 

C  ASSEMBLE  GLOBAL  STIFFNESS  AND  LOAD  ARRAYS 

do  20  j  >1,  aaaq 
k  »  la(j) 

il  (k  .aq.  0)  goto  20. 
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1  ■  jdiag(k)  -  k 
C  1  «  jdi»g(k+l)  -  k 

do  10  i  ■  1|  nioq 
a  ■  la(i) 

aim  .gt.  k  .OR.  a  .oq.  0}  goto  10 

a  ■  1  ♦  a 

bk(a)  »  bk(»)  ♦  ikd.j) 

10  coBtiauo 

20  eoBtinno 
C 

rOtBTB 

•Bd 

CaEad  Fortraa 


File:  beam3d.f 


CsHodulo  BEAMSD 

CsPnrpooo  Coaitruet  3-d  Tiaoikanko  b«aa  •louant  ■tilfnass  and  lumpad  mass 
CsAuthor  X.  Alvia 
CsData  Nay  1990 
C-Block  Fortraa 

aubroBtiaa  BEAN30(B,Bi,aj ,ak,zyz,aBod,gmod,r]io,araa,ssf2,ssf3, 
k  jtor,i2,i3,ipia,sk,sm} 


0 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


ARGUMENTS: 

a  Elaaaat  ID  Huabar 

ai  Noda  10  Noabar  at  End  i 

aj  Noda  10  Noabar  at  End  j 

xyz  Noda  Location  Array 

aaod  Natarial  Elastic  Modulus  (Young's  Modulus) 

gaod  Material  Modulus  oi  Rigidity  (Shear  Modulus) 

rho  Material  Mass  Oansity 

area  Elaaant  Cross-sactional  area 

ssf2  Shear  shape  factor  ia  elaaant  z2  direction 

saf3  Shear  shape  factor  in  alaaant  z3  direction 

jtor  Torsional  constant  J 

12  Area  aoaant  of  inertia  about  alaaant  z2  axis 

13  Area  aoaaat  of  inertia  about  alaaant  z3  axis 

ipin  Pin  release  codas:  OaFixad,  l«Fraad 

(1)  Axial 

(2)  Torsional 

(3)  End  A  rotation  about  x2  axis 

(4)  End  A  rotation  about  x3  axis 

(5)  End  B  rotation  about  x2  axis 

(6)  End  B  rotation  about  x3  axis 

sk  Elaaant  Stiffness  Matrix 

sa  Elaaant  Mass  Matrix 

integer  n.ni.nj ,nk,ipin(l) 

real*8  xyz(3,l) , aaod, gaod, rho, area, ssf2,ssf3, jtor, i2,i3 
raalaS  8k(12,l) ,sa(12,l) 


C  LOCAL  VARIABLES: 


integer  i,j 

raal*8  dc(3, 3), length, rlangth,kc(10),ac(3) 
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C  LOGIC 


C  Find  El«i«at  Lnngth 

Imgth  ■  O.OdO 
do  10  i  •  1,3 

de(l,i}  •  xyi(i,aj)  -  zyxd.al) 
longtli  >  longth  ♦  de(l,i)*'*2 
10  continno 

longth  ■  •qrt(longth) 
if  (longtli  .oq.  O.OdO)  thon 
print  *,  *BAR2D:  2oro  oloaont  longth;  n«  ',n 
rotnm 
ondif 

C  Find  diroction  eooinoo  for  xl,x2,x3  oloaont  nzoo 
do  16  i>l,3 

dc(l,i)  >  dc(l,i)/longth 
if  (nk  .oq.  0)  thon 
dc(2,i)  a  0.0 

olio 

dc(2,i)  a  xyz(i,ak)  -  xyz(i,ni) 
ondif 

15  continno 

if  (nk  .oq.  0)  de(2,3)  a  i.o 

16  dc(3,l)  a  dc(l,2)adc(2,3)  -  dc(2,2)adc(l,3) 

dc<3,2)  a  dc(2,l)ade<l,3)  -  dc(l,l)adc(2,3) 

dc(3,3)  a  dc(l,l)adc(2,2)  -  dc(2,l)adc(l,2) 

rlongth  a  sqrt(dc(3,l)««2  ♦  dc(3,2)aa2  dc(3,3)a*2) 

if  (rlongth  .no.  0.)  goto  17 

dc(2.2)  a  1.0 

dc(2,3)  a  0.0 

goto  16 

17  do  18  ial,3 

dc(3,i)  a  dc ( 3, i) /rlongth 

18  continno 

dc(2,l)  a  dc(3,2)adc(l,3)  -  dc(l,2)adc(3,3)  .. 

dc(2,2)  a  dc(l,l)adc(3,3)  -  dc(3,l)*dc(l,3) 

dc(2,3)  a  dc(3,l)adc(l,2)  -  dc(l,l)adc(3,2) 

C  Coapnto  Tnrions  otiffnooo  constants,  acconnting  for  pin  codos 

if  (ipind)  .oq.  0}  thon 
kc(l)  a  aroaaoaod/longth 

olso 

kcd)  a  O.OdO 
ondif 

if  (ipin(4)  .oq.  0}  thon 
if  (ipin(6}  .oq.  0)  thon 

kc(2)  a  aroa«gmod«ssf2/longth 
kc(6)  a  i3*OTOd/longth 
kc(7)  a  kc(2)«longth/2.0d0 
kc(9)  a  kc(7)alongth/2.0d0 
olso 

print  *,’BEiX3D:  Pin  codo  orror,  x3  diroction,  ol  *',n 
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•ndil 


all* 

if  (ipla(6)  .aq.  0)  than 

print  a,*BEAX3D:  Pin  coda  arror,  x3  diraction,  al  9' ,n 

alaa 

ke(2)  a  o.OdO 
ke(«)  a  O.OdO 
ke(7)  a  O.OdO 
kc(9)  a  O.OdO 
andil 
andif 

if  (ipiii(3)  .aq.  0)  than 
if  (ipia(5)  .aq.  0)  than 
ke(3)  a  axan*gnod*asf3/langth 
kc(6)  a  iaaaaod/langth 
ke(8)  a  ke(3)*langth/2.0d0 
kc(lO)  a  ke(8}alangth/2.0d0 
alaa 

print  *,*BEAM3D:  Pin  coda  arror,  z2  direction,  al  *' ,n 
andif 

alia 

if  (ipin(S)  .aq.  0)  than 

print  a,'BEAM3D:  Pin  coda  arror,  x2  diraction,  al  t' ,n 

alaa 

kc(3}  a  O.OdO 
kc(S}  a  O.OdO 
kc(8)  a  O.OdO 
kc(lO)  a  O.OdO 
andif 
andif 

if  (ipin(2)  .aq.  0)  than 
kc(4}  a  jtoragmod/langth 

alaa 

kc(4)  a  O.OdO 
andif 

Bc(l}  a  nran«rhoalangth/2.0d0 
■c(2)  a  i2arhoalangth/2.0d0 
bc(3)  a  i3arhoalangth/2.0d0 

ak(l,l)  a  kc(l)adc(l,l)adc(l,l)  ♦  kc(2)adc(2,l)adc(2,l)  + 

kc(3)adc(3,i)adc(3,l) 

ak(l,2)  a  kc(l)ade(l,l)adc(l,2)  +  kc(2)*dc(2,l)*dc(2,2)  + 

ke(3)*dc<3,l)adc(3,2) 

ak(l,3}  a  kc(l}*dc(l,l)«dc(l,3)  *  kc(2)adc(2,l}adc(2,3} 

kc(3)adc(3,i)adc<3,3) 

ak(l,4)  a  kc(7)«dc(2,l}adc(3,l)  -  kc(8)adc(3,l)*dc(2,i} 

ak(i,5)  a  kc(7)adc(2,l)adc<3,2)  -  kc(8)adc(3,l)adc(2,2) 

ak(l,6)  a  kc(7)adc(2,l)adc(3,3)  -  kc(8)*dc(3,l)adc(2,3) 

ak(l,7)  a  -Bk(l,l) 

ak(l,8)  a  -ak(l,2) 

ak(l,9)  a  -ak(l,3) 

ak(l,10)  a  ak(l,4) 

ak(l,ll)  a  ak(l,6) 

ak(l,12)  a  ak(l,6) 

ak(2,2)  a  kc(l)*dc(l,2)*dc(l,2)  ♦  kc(2)*dc(2,2)*dc(2,2)  + 

ke(3)adc(3,2}«dc(3,2) 
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tk(2,3}  ■  kc(l)*de(l,2)«<le(l,3)  *  kc(2}*de(2,2)*dc(2,3)  * 

ke(3)*dc(3,2}*de(3,3) 

•>(2,4)  ■  ke(7)«de(2,2)*dc(3,l)  -  ke(8)*dc(3,2)*dc(2,l) 

•k(2,6)  ■  ke(7)*dc(2,2)*de(3,2)  -  ke(8)*dc(3,2)*dc(2,2) 

•k(2,6)  ■  kc(7)*de(2,2)*de<3,3)  -  kc(8)*dc<3,2)*dc(2.3) 

•k(2,7)  ■  -•k(1.2) 

•k(2,8)  ■  -•k(2,2) 

•k(2.9)  »  -■k(2,3) 

•k(2.10)  »  •k(2,4) 

•k<2,ll)  ■  •k(2.S) 

■k(2,12)  >  •k(2.6} 

■k(3,3)  ■  kc(l}«de(l,3)*de(l,3)  ♦  kc(2)*dc(2,3)*dc(2,3)  ♦ 

ke(3)*de(3.3)*dc(3.3) 

•k(3,4)  »  ke(7)*de(2,3)*dc(3,l)  -  kc(8)*dc(3,3)*dc(2,l) 

•k(3,6)  ■  kc(7)*dc<2,3)*dc(3,2)  -  kc(8)*dc(3,3)*dc(2,2) 

•k(3,6)  ■  ke(7)*dc(2,3)*dc<3,3)  -  kc(8)*dc(3,3)*dc(2,3) 

•k(3,7)  «  -•k(l,3) 

8k(3,8)  ■  -■k(2,3) 

•k(3,9)  «  -•k(3,3) 

•k(3,10)  >  ■k(3,4) 

•k(3.11)..  >  ■k(3.S) 

•k(3,12)  «  •k(3,6) 

•k(4,4)  »  kc(4)*dc(l,l)*dc(l,l)*(kc(10)+kc(5))*dc(2,l)*dc(2,l) 

♦  (kc(9)+kc(6))*dc(3,l)>»dc(3,l) 

•k(4,S)  •  kc(4)*dc(l,l)*dc(i,2)+(kc(10)+kc(5))*dc(2,l)*dc(2,2) 

♦  (kc(9)+kc(6))*dc(3,l)*dc(3,2) 

•k(4,6)  *  kc(4)'*dc(l,l)'»dc<l,3)*(kc(10)+kc(5))*dc(2,l)*dc(2,3) 

.  ♦  (kc(9)'»kc(6})*de(3,l)«dc(3,3) 

•k(4,7)  «  -•k(l,4) 

•k(4,8)  »  -•k(2,4) 

•k(4,9)  «  -•k(3.4) 

•k(4,10)  «  -kc(4)*dc(l,l)*dc(l,l)+(kc(10)“kc(5))*dc(2,l)*dc(2,l) 

♦  (kc(9)-kc(6))*dc(3,l)*dc(3,l) 

•k(4,ll)  ■  -kc(4)*dc<l.l)*de(l,2)>{kc(10)-kc(5))*dc(2,l)*dc(2,2) 

♦  (kc(9)-kc(6))*dc(3,i)*dc(3,2) 

•k(4,12)  «  -kc(4)*dc<l,l)*dc(l,3)*(kc(10)-kc(5))*dc(2,l)*dc(2,3) 

♦  (kc(9)-kc(6))*dc(3,l)*dc(3,3) 

»k(5,6)  «  kc(4)*dc(l,2)'*dc(l,2)*(kc(10)*kc(5))*dc(2,2)*dc(2,2) 

♦  (kc(9}>kc(6)}*dcU,2}«dc(3,2) 

»k(6,6)  ■  kc(4)*Uc(l,2)*dc(l,3)+{kc(10)+kc(6))*dc(2,2)*dc(2,3) 

♦  (kc(9)+kc(6))*dc(3,2)*dc(3,3) 

•k(5,7)  «  -ikd.S) 

•k(6,8)  «  -•k(2.6) 

•k(5,9)  >  -skO.S) 

■k(S,10)  •  (kCd,!!) 

•k(5,ll)  ■  -kc(4)*dc(1.2)*dc(l,2)*(kc(10)-kc(5))*dc(2,2)*dc(2,2; 

♦  (kc(9)-kc(6))*dc(3,2)*dc(3,2) 

■k(5,12)  »  -kc(4)*dc(l,2)*dc<l,3)*(kc(10)-kc(5))*dc(2,2)*dc(2,3) 

♦  (kc(9)-kc(8))'*dc(2,3)*dc(3,3) 

•k(6,«)  ■  kc(4)*dc(l,3)*dc(l,3)*(kc(10)+kc(6))*dc(2,3)*dc(2,3) 

♦  {ke(9)+kc(6))*dc(3,3)*dc(3,3) 

•k(6,7)  «  -ikd.e) 

»k(6,8)  ■  7«k(2,6) 

■k(6,9}  •  ••k(3,6} 

■k(6.10)  «  >k(4.12) 

■k(6,ll)  «  skCS.!?) 

•k(6,12)  «  -kc(4)*dcd,3)*dcd,3)*(ked0)-kc(5))*dc(2,3)*dc(2.3) 

♦  (kc(9)-kc<6))*dc(3,3)*dc(3,3) 

•k(7,7)  »  ikd,!) 


o  o  o 


•k(7,8)  ■  tkCl.a) 

■k(7.9)  •  tkd.a) 

•k(7,10)  •  -•k(l,4> 
8k(7,ll)  ■  -ikd.S) 
•k(7,12)  ■  -tkCl.e) 
•k(8.8}  >  tkCa.a) 

Bk(8.9)  >  ikCa.a) 

Sk(8,10)  ■  -•kCa.i) 
•k(8,u)  ■  -tkCa.s) 

■k(8,12)  >  ‘ikCatS) 

•k(9,9)  •  akdiS} 

•k(9,10)  ■  -ikd.O 
•k(9,ll)  ■  -tkO.B) 
■k(9,12)  •  -akO.e) 
■kdO.lO)  «  ikCi.O 
■kdO.li)  •  ■k(4,8} 
■kd0.12)  >  ■k(4.6) 
■kdl.ll)  >  ikCS.S) 

■kCll.ia)  >  akCS.e) 
akda.l2}  •  tk(6.6) 

do  SO  i  >  i,ia 
do  S6  j  >  i,ia 
s  O.dO 

SS  'contiaaa 

SO  continua 


C  Rovatm  rotatad  ouiaa  aatrix  to  ra-diagonaliza 


C 

C 

C 


C 

C 

C 

C 

C 

C 


aad.l} 

aa(a.a} 

aa(3,3) 

aa(4,4) 


8a(4,8} 

8a(4.6) 

8a(5,4} 

aaCS.S) 


Ba(5,6) 

aa(6,4) 

8a(6.S} 

8a(6,6) 


•  acd) 
a  acd) 
a  acd) 

a  ac(a}a(dcd,l)adcd,l)'^(ic(3,l}*dc(2,l))  * 

ac(3)*(ded.l)*<icd.l)^<ic(3,l)'*(ic(3,l)) 
ac(2)*(dcd.l}«<icd,a)adc(2,l)'*<lc(2,2)}  4- 
ac(3)a(dcd,l)*dcd,2)-»dc(3,l)*dc(3,2))  + 
ac(2}*(dcd.l)*<lcd,3)adc(2,i)*<ic(2,3}) 
ac(3}a(dcd.l}«<lcd,3)adc(3.1)*(ic(3,3}) 
a  ac(2)a(dcd,l)*«lcd,2)*dc(2,l)*dc(2,2))  + 
ae(3)a(ded,l)'*«lcd,2)*dc(3,l)*dc(3,2)) 
a  ac(2)a(dcd,l)«dcd,3}adc(3,l)*dc(2,3)}  * 
ac(3)«(dcd>l}*dcd,3Hdc(3,l)*dc(3,3)) 
a  ac(2)*(dcd,l}adcd,2)>dc(2,l)*dc(2,2))  * 
ac(3)a(dcd ,  l)*<lcd  ,2}-»dc(3.  l)*<ic(3 .2) ) 
a  ae(a)«(dcd,a}adcd.a)ade(a.a)adc(2,2))  * 
ac(3)a(dcd,2)*dcd,a)ade(3,2)adc(3,2))  + 
ac(a)«(dcd,i)*<icd,a)adc(2,l}*<ic(2,2)}  * 
ac(3)a(dcd.i}*dcd.2)-»dc(3.i)*<lc(3.2))  * 
ac(a)*(dcd,2}«dcd,3)adc(a,a)adc(2,3}}  * 
ac(3)«(dcd,a)adcd,3}adc(3,2}adc(3.3)} 
a  ac(2)a(dcd,2)adcd,3)+dc(2,2)adc(2,3))  + 
Bc(3}a(dcd,a}aded,3}4>dc(3,2)adc(3,3)} 
a  ae(2)a(dcdd)'*«icd,3)*dc(a,l)*dc(2,3))  ♦ 
ac(3)*(dcd,l)*ded,3)+dc(3,l)*dc{3,3)) 
a  ae(a)*(dcdia)adcd>3Hdc(2,2)adc(2,3)}  * 
ae(3)a(dcd.a)adcd,3}«dc(3,2)*dc(3.3)) 
a  ac(a)a(dcd,3)*dcd,3)+dc(2,3)adc(2,3))  + 
ae(3)«(dcd.3)adcd,3)«dc(3.3}*dc(3,3))  * 
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o  u  u 


s«(7,7)  ■ 

■e(2)*(dc(l,l)*dc(l,3)4dc(2.1)*dc(2,3)) 

■c(3)a(dc(l,l)*de(l,3)adc(3,l)*dc(3,3)) 

■e(2)*(de(l,2)>)>de(l,3)4dc(2,2)*de(2,3)) 

■c(3)a(de(l,2)ade(1.3)*dc(3.2)*dc(3,3)) 

■c(l) 

sa(8,8)  • 

■e(l) 

■■(9,9)  « 

■e(l) 

■■(10,10)  > 

■■(4,4) 

■■(10,11)  > 

■■(4,5) 

■■(10,12)  a 

■■(4,6) 

■■(11,10)  > 

•■(5,4) 

■■(11,11)  > 

■■(5,5) 

■■(11,12)  a 

■■(5,6) 

■■(12,10)  a 

■■(6,4) 

■■(12,11)  a 

■■(6,5) 

■■(12,12)  a 

■■(6,6) 

do  100  lal.l2 

do  200  j«l 

.i-1 

•k(i,j)  ■  ikCj.i) 
200  eoatinu* 

100  coatinua 

ratara 

aad 

C=End  Fortraa 


File:  forces. f 


C«Modula  FORCES 

CsPurposa  Calculata  appliad  forca  vactor  at  givan  tima 
CsAathor  X.  Alvia 
CsData  Kay  1990 
C-Block  Fortraa 

C  - 

c 

C  Snbroutiaa  FORCES 
C 

C  Parposa : 

C  Rataraa  forca  froa  atorad  faactioa  at  aaj  givaa  tima. 

C  Tha  forciag  laactioaa  ara  kardvirad  by  tha  aaar.  Tka 

C  faactioa  it  aaloctabla  at  prograa  azcacatioa  atiag  tha 

C  forciag  faactioa  10,  wkick  by  coaaaatioa  is  tka  statamant 

C  labal  asad  ia  braackiag. 

C 

C  - 

c 

sabroatiaa  FORCES(tima) 

iaclada  'skarad.iac* 
raalas  tiaa,pi 

C  LOGIC 

pi  >  3.1415926 
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eaU  ZEROVECTCf.ndof) 

101  if  (forcaid  .aq.  101)  than 

it  (tiaa  .la.  .02)  than 
f(id(2.1S))  >  100.a(i.-eoa(2.*piatiaa/.02)) 
andif 

102  alaaif  (loreaid  .aq.  102)  than 

if  (tiaa  .It.  .1)  than 
£(id(2.96))  •  10. 
alaaiZ  (tiaa  .aq.  .1)  than 
l(id(2.9S))  >  0. 

alsail  ((tiaa  .gt.  .1). and. (tiaa  .It.  .2))  than 
f(id(2.96))  •  -10. 

alsa 

l(id(2,96))  «  0. 
andii 

103  alaaif  (forcaid  .aq.  103)  than 

if  (tiaa  .la.  .01)  than 

f(id(l,16))  «  100 
andif 

104  alaaif  (forcaid  .aq.l04)  than 

if  ((tiaa  .gt.  0)  .and.  (tiaa  .It.  .17))  than 
f(id(3,12S))  «  10 

alaaif  ((tiaa  .gt.  .17)  .and.  (niaa  .It.  1.0))  than 
f(id(3,128))  ■  -10 
andif 

105  alaaif  (forcaid  .aq.  lOS)  than 

if  (tiaa  .la.  .01)  than 

f(id(2,9))  *  100.*(l.-coa(2.'*pi*tiaa/.01)) 
alaaif  (tiaa  .la.  .02)  than 

f(id(2,9))  «  100.a(coa(2.apiatiaa/.01)-l.) 
andif 

andif 

do  10  i  a  1,  ndof 
f(i)  a  icalaf  a  t(i) 

10  continna 

ratnm 

and 


File:  input. f 


CaModnla  HVOT 

CaPnrpoaa  Input  data  paraaatara  for  ACSZS 
CaAuthor  X.  Altrin 


£7 


C>Dat«  May  1990 
CsBloek  Fortran 

C  - 

c 

C  Subrontiaa  IMPUT 

C 

C 

C  - - 

c 

C  Arguaoat  dafinitioaa 
C 

C  rvatypa  -  ID  oi  aaalyaia  ran  typo 

C  savin  -  variabls  to  control  eraation  oi  input  iilo 

C  runlilo  *■  variabls  indieatos  if  run  is  froa  input  fils 

C  consnt  **  duasqf  nans  lor  eonoat  input  linos 

C  outskip  -  nunbsr  of  stops  to  skip  boforo  sanding  output 

subroutino  IMPOTCruntypo, outskip) 

includo  'sbarod.inc' 
intagor  runtypa,  outskip 
eharaetar*!  savin, runfilo,tanp 
charact  or *48  conaant , inpf ilo 

C  PRIHT  AMD  READ  START-UP 

print  *,  *2nd  Ordar  Aecaloratad  CSI  Simulation  (ACSIS)' 
print  * 

print  a,  *Plaasa  input  analysis  typo:’ 
print  a 

print  a,  <  i.  Eigonnods  Analysis* 

print  a,  >  2.  CSX  Simulation' 

print  a,  •  3,  Transiont  Rasponsa* 

print  a 

road  a,  runtypa 

C  RUM  OPTIONS  AMO  INPUT  FILE  SETUP 

runfila  ■  ’n* 
if  (runtypa  .It.  0)  tban 
runtypa  »  -1  a  runtypa 
runfila  «  'y' 
andif 

print  a,  >Do  yon  wish  to  sava  an  input  fila?  (y  or  n)' 
road  21,  savin 

20  format  (a32} 

21  format  (al) 

if  (savin  .aq.  *y')  than 

print  a,  'Mama  of  sava  input  fila?  (filanamo)' 

road  20,  inpfila 

opaa(16 ,f ilaainpf ilo) 

runtypa  ■  -1  •  runtypa 

vrita(16,*(i2)*)  runtypa 

runtypa  a  -i  *  runtypa 

vrita(16,*(al)*)  *n* 

■rito(16, *(a47)’)  *a  ACSIS  input  fila, two  linos  abova  aro' 
vrita(16, *(a48)*)  'a  analysis  typa  and  sava  input  fila.  Do* 
vrita(16,*(a48)*)  *a  sot  ebanga  tbam  by  aditing  this  fila.* 
andif 
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runtyp*  ■  runtjp*  -  2 

if  (nuuCil*  .cq.  '7'}  than 
do  30  i  •  1,4 

raad  20,  coMiaBt 
30  coatiana 

aadif 

priat  «,  *Flaita  Elaaaat  Kodal  lapnt  Flla  Vaaa  (lilaaana)* 
raid  20.  laiUCila 
opaa( 11 , f ilaaf aaf ila ) 
if  (savia  .aq.  'y'}  thaa 

«rita(18,*(a47)')  **  Fiaita  alaaaat  iaput  fila?(filanaBa) * 
«rita(16.*(a32)')  faitfila 
aadif  , 

if  (raatjpa)  100,200,300 

C  EIQEHNODE  INPUTS 

100  priat  a.’MuBbar  of  andaa  daairad:' 

if  (ruafila  .aq.  'j')  raad  20,  coanBaat 
raad  <*,  aaig 

if  (ruafila  .aq.  'y')  raad  20,  conaaat 
priat  « , *  Output  Fila  Naaa : * 
raad  20,  outfila 
opaB(13,f ilaaoutfila) 
if  (aavia  .aq.  *y*)  tbaa 
«rita(16,’(a36)*)  *a  lumbar  of  modaa  daairad?’ 
writa(16, ’(14)’)  aaig 

■rita(16, ’(a33)*)  '*  Output  filaTCfilauama)’ 
«rita(16,’(a32)')  outfila 
aadif 

call  REAOFEN 
goto  1000 
C  CSI  INPUTS 

200  priat  « , ’ Coatrollar  Dafiaition  Fila  Kama:' 
if  (ruafila  .aq.  ’y’)  raad  20,  cooaaat 
raad  20,  coafila 
opaa(12,filaacoafila) 
priat  a,  'Plaasa  iaput  typa  of  control:' 
priat  a 

priat  a,  '  1.  Full  Stata  Faadback' 

priat  a,  '  2.  Luanbargar  Obaarrar  (LlaO)* 

priat  a,  '  3,  Xalmaa  Filtar' 

priat  a 

if  (ruafila  .aq.  'y')  raad  20,  commant 
raad  *,  coatypa 
eoBtypa  ■  coatypa  **  2 

priat  a, 'Initial  tima,  fiaal  tima,  control-oa  tima,  atap  aiza; 
if  (ruafila  .aq.  'y'}  raad  20,  commaat 
raad  *,  t0,tf.te,h 

priat  a, 'Forcing  function  ID,  acala  factor,  damping  coaff-  a,b 

if  (ruafila  .aq.  *y')  raad  20,  commaat 

raad  *,  forcaid.acalaf ,adamp,bdamp 

priat  a,'Pbaaa  lag  fiz?(y  or  a):' 

if  (ruafila  .aq.  *y')  raad  20,  commaat 


59 


1 

I 

i 

I 

I 

I 


r«ad  21,  t«ap 

if  (tMp  .tq.  *7*)  Bolag  ■  .tru*. 
if  (tuip  .aq.  ’a*}  aolag  ■  .lalta, 
priat  •,'Oaia  aeal*  factors  (4  total):' 
if  (raafilo  .sq.  'yO  road  20,  comoat 
road  «,qalpha,qbota,qalphao,qbotao 
if  (savia  .oq.  *y')  thoa 

■rito(lB,*(a42)0  '*  Coatrollor  filo  aaffloTCfiloaama) * 
«rito(i6,’(«32)')  eoafilo 

«rito(16,*(a42)*)  '•  Ploaso  iapat  typo  of  coatrol:  ' 
«rito(16,*(il0)*)  eoatypo  *  2 

writo(16,*(a46)')  '«  Iaitial,fiaal,eoatrol-oa,stop  sizo?* 
writo(16,'(4fl4.8)>)  t0,tf,te,b 

writo(16, '(a49)')  *o  Foreiag  fuaetioa,scalo  f,  damping  a,b? 
writa(18, *(i4,fl6.6,2fl2.8)*)  forcoid,sealof ,adamp,bdamp 
■rito(l6,‘(a32)‘)  '•  Phaso  lag  fix?(y  or  a)' 
if  (aolag)  *rito(16,*(al)')  »y* 
if  (.Bot.  aolag)  writo(18,'(al)*)  *a* 
vrita(16,'(a40)*)  'o  Gaia  scalo  factors  (4  total)?' 
srito(16, * (4f 14.8) * )  qalpba,qbota,qalphao,qbotao 
oadif 

call  mOFEK 
goto  999 

C  TRANSIENT  RESPONSE  INPUTS 


300  priat  «,*Iaitial  timo,  fiaal  timo,  stop  sizo;* 
if  (raafilo  .oq.  'y')  road  20,  commoat 
road  «,  t0,tf,h 

priat  «,*Forciag  faactioa  ID,  scalo  factor,  damping  coolf-  a,b 
.if  (raafilo  .oq.  'y')  road  20,  commoat 
road  *,  forcoid,scalof ,adamp,bdamp 
if  (savin  .oq.  'y')  tbon 

vrito(16,'(a48)’)  ’*  Initial,  final,  stop  sizo?' 
srito(16,'(3fl4.8)')  t0,tf,h 

vrito(l6, '(a49)')  Forcing  fanction, scalo  f,  damping  a,b? 
vrito( 16 , ' (i4 ,1 IS . 6 , 2f 12 . 8) ' )  f orcoid , scalof , adamp ,bdamp 
ondif 

call  REAOFEK 
goto  999 

C  OOTPOT  OPTIONS 


999  print  «,'0atpat  Filo  Namo:' 

if  (raafilo  .oq.  'y')  road  20,  commoat 
road  20,  oatfilo 
opon(13,filooontfila) 

priat  <«, 'Number  of  displacomont  rosalts  to  output  (max  10):' 
if  (raafilo  .oq.  'y')  road  20,  commoat 
road  «,adisont 
do  500  iol,BdiBont 

priat  o, 'Input  aodo  #,  dof  for  displacomont  output*',! 
road  o,ontlabol(i),outlabol(i'*'10) 

500  contiaao 

print  «,’Numbor  of  velocity  results  to  output  (max  10):' 
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if  (rnafil*  .aq.  *y'}  read  20,  eonmaat 
raid  a.avalovt 
do  600  ial,avalout 

priat  a,*laput  aoda  6,  dof  for  valocity  output#',! 
road  «,otttlabol(ia20} ,outlabal(l'f30) 

600  coatiaao 

priat  a.'Saad  output  ovary  bo«  aaaj  atapa?* 
if  (ruafila  .aq.  'yO  road  20,  coaaaat 
road  a,  outakip 
if  (aavia  .aq.  *y'}  tbaa 

nita(16,'(a38)*)  'a  Output  fila  aaaa?(f iloaaaa) ' 
«rita(16,*(a32)')  outfilo 

«rita(16, '(a42)*)  *a  luabar  of  diaplaeaaaat  outputa?' 
vrita(i6,*(i4}0  adiaout 
do  660  !■!, adiaout 

«rita(16, • (2i8) • )  outlabal(i) ,outlabal(iai0} 

650  eoatiaua 

vrita(16,'(a38)')  'a  luabar  of  valocity  outputa?' 
«rita(16, '(i4)*)  avalout 
do  660  !■!, avalout 

vrita(i6,  ’(2i8)')  outlabal(i«20) .outlabal(i'»'30} 

660  eoatiaua 

vrita(16,*(a44)*)  'a  Saad  output  ovary  bov  aaay  atapa?' 
vrita(16, '(i3)')  outakip 
aadif 

C  illKATION  OPTlOl 

priat  a,'iaiaatioo  Output?  (y  or  a}:' 
if  (ruafila  .oq.  'y')  road  20,  commaat 
road  21,  taap 

if  (taap  .oq.  'y')  aaiaata  >  .trua. 
if  (taap  .aq.  'a')  aaiaata  >  .falaa. 
if  (aaiaata)  tbaa 

priat*, 'Aaiaatioa  file  aaaa  (filaaaao}' 
if  (ruafila  .oq.  'y'}  road  20,  coaaant 
road  20,  aaiafila 
opoa  (15,  fila*aaiafilo) 
aadif 

if  (aavia  .aq.  'y'}  tbaa 

vrita(16, '(a4i}'}  '«  Saad  aaiaatioa  oatpttt?(y  or  a)' 
if  (aaiaata)  vrit*(16,'(al)')  'y' 
if  (.aot.  aaiaata)  vrita(16,'(al)')  'a' 
if  (aaiaata)  tbaa 

vrito(i6,’(a31)')  '*  Aaiaatioa  fila  aaaa?' 
vrita(16, ' (a32) ')  aaiafila 
aadif 
aadif 

dolta  *  b/2. 
dalaq  •  dolta**2 

1000  ratara 
aad 


File:  pmvmul.f 


61 


C>Hodul«  PNVmn. 

C«Aathor  K.  Alvia 
CsD«t«  N«7  1990 
CsBlock  Portrui 

C 

C  Subrotttia*  PHYHUL 
C 

C  P«rpot«: 

C  Tliis  •ttbro«tia«  mltiplict  a  matrix  la  vactor  form 

C  aad  a  vactor. 

C 

c  - - - 

c 


c 

Argnaanta 

c 

a 

aatrlx  in  vactor  lorn 

c 

b 

vector 

c 

e 

rasnlt  vactor 

c 

aaq 

ordar  of  vactor  and  sqnara  aatriz 

c 

jdiag  - 

array  of  diagonal  addrassas  for  a 

c 

C  anbrontiaa  PHYIItlLCa, jdiag,b,aaq,c) 

raearaiva  aubroutiaa  PKVKUL(a, jdiag,b,aaq,c} 

raalaS  a(l},  bCl),  c(l) 
intagar  jdiag(l),  aaq 

do  100  i«l,aaq 

c(i)  a  a(jdiag(i))*b(i) 

100  contiaaa 

do  200  ia2,aaq 

do  300  j«jdiag(i-l)+l,jdiag(i)-l 
k  »  jdiag(i)  -  j 
c(i)  ■  c(i)  ♦  a(j)*b(i-k) 

300  coatiana 

200  coatiaua 

do  250  i>2,aoq 

do  400  j«jdiag(i-l)+l,jdiag(i)-l 
k  ■  jdiag(i)  -  j 
c(i-k)  •  c(i”k)  ♦  a(j)*b(i) 

400  coatiana 

250  coatiana 

ratnra 

and 

C 

C  - 

c 

C  Snbrontiaa  PMVNAD 

C 

C  Pnrposa : 

C  Hnltiplj  a  aatriz  in  vactor  fora  aad  a  vactor  and  add  tha 

C  raanltaat  vactor  onltipliad  by  a  constant  to  a  sacond  vactor 
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Bultipliad  bj  a  sacoad  vector 


C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


100 


300 

200 


400 

2S0 


Arguoata 

a 

b 

e 

factl  - 
faet3  - 
jdiag  - 
aaq 


■atriz  la  vector  form 

vector  to  be  aaltiplled  with  matrix 

reealtaat  aad  vector  to  be  added 

coaetaat  Mtltiplier  of  matrix  aad  first  vector 

coastaat  multiplier  of  seeoad  vector 

arrap  of  diagoaal  addresses  for  matrix 

order  of  vectors  aad  matrix 


subroutiae  PHVlU0(a«jdiag,b,aeqtfactl,c,fact2) 

recursive  subroutiae  PHYXlDCa, jdiag,b,aeq, factl, c,fact2} 

realeS  a(l),  b(l),c(l), factl, facts 
iateger  jdiagCl),  aaq 

do  100  i>l,aeq 

c(i)  «  fact2*c(i}  ♦  factl*a( jdiag(i))«b(i) 
coatiaue 

do  200  i«2,aeq 

do  300  j«jdiag(i-l)^l,jdiag(i)“l 
k  «  jdiag(i)  -  j 
c(i)  ■  c(i)  ♦  factiea(j)*b(i-k) 
coatiaue 
coatiaue 

do  260  i>2,.aeq 

do  400  j«jdiag(i-l)+l,jdiag(i)-l 
k  ■  jdiag(i)  -  j 

c<i-k)  *  c(i-k)  ♦  factl*a( j)'»b<i) 
coatiaue 
coatiaue 

return 

end 


File:  prepfem.f 

.  f 


C*Module  PREPFEX 

CsPurpoae  Preproeess  Structure  Finite  Element  module  for  ACSIS 
CsAutkor  K.  Alvia 
CeOate  May  1990 
CsBlock  Fortran 


C  Subroutine  PREPFEX 
C 

C  Purpose: 

C  This  subroutine  prepares  tbe  finite  eleaeat  mass, 

C  etiffaess,  aad  S  matrices  ia  reduced  profile  vector  form 
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c 

c  - 

c 

C  Local  variablaa ; 
C 


c 

8k 

Elaaaat  Stiffaaaa  matrix 

c 

aa 

Elaaaat  Xaaa  Matrix 

c 

la 

Local/Olobal  DOF  Xappiag  vector 

c 

aaaq 

Xuabar  of  alaaaat  dagraaa  of  freedom 

c 

aa.ap 

Xatarial  aad  Propaty  id  t  for  alamaat 

C 

■nbroatiaa  PREPFEX 
iaclndo  ‘abaroi.lBC* 

C  LOCAL  VARIABLES 

paraaator  (XAXSEQ«24) 

r«al*8  akCMAZSEQ .MAXSEQ) . BmCMAXSEQ .NAXSEQ) .nc ,kc 
iatagar  la(HAXSEQ) ,aaaq,am,ap 

call  RENim 

C  Sat  up  akyliaa  atoraga  proXila  for  global  matricaa 

call  PROFILE(ix,id,idiag,aap,aol,i,6,mlaa,adof,mask) 

C  ParfoxB  autonatic  donaia  dacompoaitioa 
call  DOMDEC 

C  Chack  aiza  of  akyliaa  profile  agaiaat  atoraga  limitation 
if  (adaa  .gt.  NAXMLEN)  thca 

priata,  'PREPFEX;  error,  global  matrix  axcaadad  max.  aiza' 
aadif 

C  Zero  Global  Xatricaa  prior  to  aaaambly 

call  ZEROVECTCatif.mlaa) 
call  ZEROVECT(maaa,mlaa) 

C  ASSEXBLE  EACH  ELEXEXT  HASS  AMO  STIFFNESS 

do  100  a>l,aal 

do  20  k>l,4 
jaix(k,a) 

if  (Catypa(a).aq.l).aad.Jk.gt.2))  j  ■  0 
do  30  ial,6 
kk«6*(k-i)  ♦  i 
if  (j  .aa.  0)  tkaa 
iB(kk)  »  id(i,j) 
alaa 

la(kk)  >  0 
aadif 

30  coatiaua 

20  coatiana 
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it  (stypaCa)  .aq.  1)  thaa 
aaaq  •  13 
as  ■  aMt(a) 

ap  a  apropCa) 

eaU  BEAK30(a,lz(l .a) .iz(2.a) .ixO.a) .eozjz.aatd ,am} . 

■at  (3 ,  aa)  .MLt  (3 » aa)  .prop(  1 ,  ap)  .prop(6 .  ap)  ,prop(  6 ,  ap) , 
prop(3 1  ap) ,prop(3 , ap) , prop(4 , ap) ,pia(l .a) . ik , am) 
alaaif  (ix(l.a)  .aa,  0)  tkaa 

priata,»PRE?FEM'naaaat  typa  ot  louad,a»»,a,*atypa»»,atypa(a) 
aadif 

C  ADD  ELEHEHT  TO  QLQBAI.  BASS  ABD  STIFFNESS 

call  ADDST?(ak,la,ati£,jdiag.aaaq) 
call  ADDSTF(aa,la,aaaa,jdlag.aaaq) 

C  SAVE  THE  ELEMENT  STIFFNESS  FOR  E-BY-E  COMPUTATIONS 

call  SAVESX(ak,a,aaaq) 

100  coatiana 

C  ADD  LUMPED  INERTIAS  TO  GLOBAL  MASS 

do  12S  Isl.aap 
do  130  jai.e 

il  (id(j,i)  ••q-  0)  goto  130 
k«jdiag(id(j,i)) 

■aaa(k)  a  aaaaCk)  *  iaartia(j,i) 

130  coatiana 

126  coatiana 

C  ASSEMBLE  AND  FACT  .I'ZE  aa  (S  MATRIX) 

■c  «  1.  *  dalta«adaap 
kc  >  daltaabdaap  *  dalaq 
do  300  ial,aloa 

aa(i)  a  Bcaaaaa(i)  *  kc*atiY(i) 

200  coatiana 

call  SOLVER(aa,ga,jdiag,adol,l) 

C  INITIALIZE  DISPLACEMENT  AND  VELOCITY  VECTORS 

do  300  i  a  1,  nap 

do  350  j  a  1,6 

it  (id(j,i)  0) 
q(id(j,i))  •  qO(j.i) 
qdot(id(j,i))  a  qdotO(j,i) 
aadiX 

350  coatiana 

300  coatiana 

ratnra 


anbrontina  SAVESK(ak,B,naaq) 
iaclnda  ’aharad.iac’ 
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r«4l*8  >k(at«q,l) 
latagtr  &taa«q 

kaO 

do  10  jal,Bt«q 
do  20  i«l,j 
kak^l 

•stilB(k,a)>ak(i,j) 

20  coatiana 

10  eoatiaaa 

ratnxa 

aad 

aabrontiaa  DOMOEC 

iacluda  'aharad.iac' 

logical  aekk.adchkOUXHODE.MAXDON) 
iatagar  adoa 

do  10  jal.MAXDOM 
oald(j)«0 
do  20  i>l,Bap 

adehk(i, j)3.1alaa. 

20  coatiana 

10  coatiana 
ndoaaiasO 

do  100  aal.nal 

ndoa*0 

nchk«0 

do  200  whila  (ackk.aq.O) 
adoataadoB'^l 

if  (adoa.gt.ndoaain)  ndoaaiaaadoa 
nchkal 

if  (Bdchk(iz(l,B},ndoa})  achkaO 
if  (adclik(iz(2,a)  ,adoa})  ackkaO 
if  (achk.aq.l)  thaa 
aldoa(B}aBdoa 
adchk(iz(l ,a) ,adoa)a . trna . 
ndchk(iz(2,B} ,adoa}a.trna. 
aadif 

200  coatiana- 

nald(adoa)«aald(Bdoa)'*’l 
alaua(nald(adoa)  ,ndoa)aa 

100  coatiana 

ratnra 

aad 


File:  profile.f 
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CsModul*  PROFILE 

C>Pttrpog«  Coi^at*  th«  suibar  of  oquationa  and  aat  profila  for  K 
CaAtttRor  Bob  Taylor 
CsDato  «ho  kao«s 

CaUpdato  January  1989  by  B.  Praaoao 
CaBloek  Fortran 

aubroatino  PEOFILE(ix,id,jdia{,nap,nol,nontndof ,nad,naq,aatlc} 
C  PURPOSE: 

c  THIS  SOBROOTlIl  COMPOTES  THE  HONBER  OF  EQOITIOMS  REQUIRED 

C  TO  SOLVE  THE  PROBLEM  BT  ELIMIMATIMQ  RESTRAIMED  DEGREES  OF 

^  SYSTEM  OF  EQUATIOMS.  XIOVIHO  THE  EQUATION 

C  NUMBERS  COORESPOMDINQ  TO  THE  NODAL  DEGREES  OF  FREEDOM,  THE 

C  DIAGONAL  ELEMENT  LOCATIONS  CAM  BE  COMPUTED  FOR  STORING  THE 

C  GLOBAL  STIFFNES  MATRIX  IN  COMPACTED  VECTOR  FORM. 

C— - - _ _ _ 

c 

C  ARGUMENTS 
C 

intagor  ix(naa,l),  id(adof.l),  jdiag(l) 

^tagar  nnp,  nal,  nad,  naq.  naakd) 

C  intagar  nnp,  nal,  nan,  ndof,  nad,  naq,  maakCl) 

C 

C  LOCAL  ARGUMENTS 
C 

intagar  i,  j,  k,  1,  n,  n,  jl,  kl,  li,  ni 


+C 

C 

C 

C 

C 

C 

C 

C 

-C 


C  SET  UP  EQUATION  NUMBERS 
C 

naq  «  0 

do  30  a  a  1 ,  nnp 
do  20  B  a  1,  ndof 
j  a  id(B,Bask(a)} 
iX  (j  .aq.  1)  goto  10 
naq  a  naq  ♦  1 
id(a,aa8k(n)}  >  naq 
jdiag(naq}  a  o 
goto  20 

id(a,aaak(n)}  a  o 
20  eontinua 

30  eontinua 
C 
C 

C  COMPUTE  COLUMN  HEIGHTS 
C 

do  80  n  a  1,  nal 


do  70 

B  ' 

a  1,  nan 

Bl 

m  : 

iz(B,n} 

if 

(ni  .la.  0}  goto  70 

do 

60 

1  a  1,  ndof 

11 

a  id(l,Bl) 

if 

(11  .aq.  0)  goto  60 

do 

80  k  a  nan 

kl  a  ix(k,n} 

if  (kl  .la.  0)  goto  60 

do  40  j  a  i,  ndof 

jl  a  id(j,kl) 

if  (jl  .aq.  0)  goto  40 
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i  •  HiZOdl.Jl) 

jdi«g(i)  ■  lllXO(jdi«Lg(l),  llBS(ll-jl)) 
40  coatinu* 

60  eoatiaa* 

60  eoatiau* 

70  eoatian* 

80  eoatiaa* 

C 

C 

C  CONPUTE  OliGONAL  POUTERS 
C 

aad  ■  1 
jdiag(l)  »  1 
if  (a«q  .aq.  i)  ratara 
do  90  a  •  2,  aaq 

jdiag(a)  ■  jdiag(a)  ♦  jdiagCa-l)  ♦  1 
90  eoatiana 

aad  •  jdlagCaaq) 

C 

ratura 

aad 

C-Ead  Fortraa 


File:  read.f 


C>Kodula  REIO 
CaAuthor  K.  Alvia 
C«Data  Kay  1990 
C«Block  Fortraa 

C  - 

c 

C  Sabrotttiaa  READFEM 

C 

C  Parpoaa: 

C  nia  aabroutlaa  raada  tha  data  fila  for  tha  finita 

C  alaaaat  sodal. 

C 

C  - 

c 

C  Argaaaata 

C  ctypa  -  atoraa  coda  for  typa  of  liaa 

C 

aabroatiaa  REAOFEX 
C  6L0BALS 

iaelada  ’aharad.iBc' 

C  LOCALS 

iatagar  j,a,etjpa,6ETnPE 
eharactar«132  aliaa 
raal*8  ia 

C  ZMZTIALXZE  SIZE  OF  PROBLEX 
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nnp  ■  0 
a«l  ■  0 
ndof  ■  0 
adoMda  ■  0 

IDDITirT  CARD  TYPE  AID  ASSIOV  IXPOT 

r««d(11.1000,«iid>9999)  alia« 
etyp*  ■  61TTTPE(«lia«) 


11  («lia«(l:4) 
11  (alla*(l:4) 
11  (alla«(l:4) 
11  (alla«(l:4) 
11  (alla«(l:4) 
11  (alla«(l:4) 
11  (allaa(l:4) 
11  (alla«(l:4} 
11  (alla«(l:4) 
11  (klia«(l:4) 
prlat  *,'R£AOn 
goto  10 

READ  MODES 


.oq. 

•MODE*) 

goto 

200 

•  oq. 

»T0P0*) 

goto 

300 

J 

.oq. 

‘ATTRO 

goto 

400 

.oq. 

•MATE*) 

goto 

500 

\ 

.oq. 

•PROP*) 

goto 

600 

s 

.oq. 

•Fill*) 

goto 

700 

.oq. 

•MIT*) 

goto 

800 

.oq. 

•IMER*) 

goto 

900  . 

.oq. 

•EMD  •) 

goto 

10 

_  1 

.oq. 

•MESH’) 

goto 

10 

200  r«ad(ll,1000,«ad«9999}  allao 

etypo  «  GEmrPE(alla«) 

11  (etypo)  200,250.100 

250  road(allao,»)  a,(eoxyz(j ,a) ,jal,3) 

11  (a  .gt.  aap)  aap  •  a 
goto  200 

C  READ  TOPOLOGY 

300  romd(ll,1000,oads9999)  alia# 

etypo  «  GETTYPE(allao) 

11  (etypo)  300,350,100 

350  road(allao,o)  a,otypo(a) ,(lz(j ,a) , jsl,4} 

11  (a  .gt.  aol)  Bol  «  a 
goto  300 

C  READ  ATTRIBUTES 

400  rood(ll,1000,oado9999)  allao 

etypo  >  GETTYPE(allao) 

11  (etypo)  400,450,100 

450  road(allao,*)  a,eaat(a) ,oprop(a) ,(piB(j ,a) , jsl,6} 
11  (oldoa(a).gt.adoaala)  BdoBala«oldoa(B) 
goto  400 

C  READ  MATERIAL 

500  road(ll,1000,OBda9999)  allao 

etypo  •  0ETTYPE( allao) 

11  (etypo)  500,560,100 

560  road(allao,«)  B,(aat(j,a),j>l,3) 
goto  500 

C  READ  PROPERTIES 
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600 


660 


C 

700 


760 


C 

800 


850 


C 

900 


960 


1000 

9999 


C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

c 


r««d(ll,i000,ndB9999)  alia* 
etyp*  *  OETTTPECalia*) 
il  (etyp*)  600,650,100 
r*ad(alia*,«}  n,(prop(j,a),j>l,6) 
(oto  600 

lUUO  FXZZTT 

r*ad(ll.i000,*nd*9999)  alia* 
etyp*  >  OETTTPECalia*) 
it  (etyp*)  700,750,100 
.r*ad(alia*,*)  a,(id(j ,a) ,j>l,6) 
goto  700 

READ  niTZAL  CONDITIONS 

r*ad(ll,1000,*ada9999)  alia* 
etyp*  •  OETTTPECalia*) 
it  (etyp*)  800,860,100 
r**d(alia*,*)  a, j ,qO(j ,a) ,qdotO(j ,a) 
goto  800 

READ  INERTIA 

r*ad(ll,1000,*ad«9999)  alia* 
etyp*  «  OETTTPECalia*) 
il  (etyp*;  900,960,100 
r*ad(alia*,«)  a,j,ia 
ia*rtia(  j  ,a)>la*rtia(j  ,a)'*ia 
goto  900 

lorMt(al32) 

coatiaa* 

rotara 

*ad 


Sabroatia*  READCON 
Parpo**: 

This  sabroatia*  r*ads  tb*  aetaator  aad  sansor 
locatioas  aad  tb*  gaias  lor  tb*  coatrol  systta 


Argaaaats 

etyp*  -  stor*B  eod*  lor  typ*  ol  lia* 


Abbroriatioas 

NACT  -  aaabor  ol  aetaators 

NSEN  -  aaabor  ol  soasors 

BEAT  -  loeatioas  ol  aetaators 

BDNA  •  array  ol  displaesasat  ssasor  locatioas 

ETNA  **  array  ol  vsloeity  ssasor  loeatioas 

FlOA  •  eoatrol  gaia  aatrix 
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C  F2aA  -  control  gain  aatrix 

C  LiOA  •  stato  oatiaator  illtor  gain  SMitrix 

C  L30A  <*  atata  aatiMter  liltar  gain  matrix 

sttbroutina  REAOCOI 

inelnda  ’aharad.ine* 

C  LOCALS 

raal*8  val 

intagar  j,n,et]rpa,OETTTPE 
charaetaralSO  alina 

bvol  ■  0 
hdral  ■  0 
hrval  ■  0 
hdbval  •  0 
bvbval  •  0 

C  lOmiFT  CARD  TYPE  AID  ASSIGV  IHPITT 

10  raad(12,1000,and«9999)  alina 

100  ctypa  «  QETTTPE(alina) 


if 

(ctjpa)  10,10,150 

if 

(alina(l:4)  .oq. 

'MACT* 

) 

goto 

200 

if 

(alina(l:4)  .aq. 

'ISEM' 

) 

goto 

300 

if 

(alina(l:4)  .aq. 

»BMAT* 

) 

goto 

400 

if 

(alina(l:4)  .aq. 

'EDKA' 

) 

goto 

500 

if 

(alina(l:4)  .aq. 

'HVIA' 

) 

goto 

600 

if 

(alina(l:4)  .aq. 

•FlOA' 

) 

goto 

700 

if 

(alina(l:4)  .aq. 

'r2GA* 

) 

goto 

800 

if 

(aliaa(l:4)  .aq. 

*L2GA’ 

) 

goto 

900 

if 

(alina(l:4)  .aq. 

•LIGA' 

) 

goto 

1100 

if 

(aliaa(l:4)  .aq. 

•ElO  ' 

) 

goto 

10 

print  a, 'REAOCOI:  Unraeognizad  card  tjpa;  ',ali&a(l;4) 
goto  10 

C  READ  IIPDT  CAROS 

200  road(12,1000,and«9999}  alina 

ctjpa  •  6ETTYPE(alina) 
if  (ctypa)  200,250,100 

250  raad(alina,*)  nact 
goto  200 

300  raad(12,1000,ondB9999)  alina 

ctppa  •  OETTTPE(alina) 
if  (ctjpa)  300,350,100 

350  raad(allna,*)  naan 
goto  300 

400  raad(12,1000,and«9999)  alina 

ctypa  a  GETTYPEC alina) 
if  (ctjpa)  400,450,100 

450  raad(alina,a)  i,j,n,val 
bval  a  bval  *  1 
b(btal)  a  val 
bro«(bTal)  a  id(j,i) 
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beoKbval)  ■  a 
goto  400 

500  r«ad(12,1000,«ad>9999)  alia* 

etyp*  >  0BXTTPE(alia«) 
if  (etypa)  600.660,100 
550  raadCalia*,*)  l.j.a.Tal 
bdval  •  hdval  *  1 
hd(IUlval)  ■  val 
lidro*(lulval)  ■  a 
hdeoKlidval)  »  Id(j.i) 
goto  500 

600  road(12.1000,«ad>9999)  alia# 

ctjpo  ■  QETTTPE(allao) 
if  (etypo)  600,660,100 
650  road(alia«,«)  l,j,a,v»'’ 
hvral  «  hwal  ♦  1 
hT(bTval)  •  val 
hTrov(hTval)  •  a 
hveol(bvval)  • 
goto  600 

700  raad(12,1000.aoda9999)  alia* 

ctyp*  «  QETTYPE(aliBo) 
if  (etypo)  700,760,100 
750  r«ad(aliao,a}  i,j,B,val 

fl(a,id(j ,1})  «  qalpha«val 
goto  700 

800  road(12,1000,«ad«9999)  alia* 

etypo  a  CETTTPECaliao) 
if  (etypo)  800,850,100 
8S0  roadCaliao,*)  i,j,a,val 
f2(a,ld(j ,i})  a  qbota*val 
'  goto  800 

900  Toad(12.1000,oada9999)  aliao 

etypo  a  GETTTPE(aliao) 
if  (etypo)  900,960,100 
950  road(aliao,a)  i,j,a,Tal 

12(id(j,i),a)  a  qbotaoaval 
goto  900 

1100  road(12,1000,oada9999)  aliao 
etypo  a  GETTTPE(aliao) 
if  (etypo)  1100,1150,100 
1150  road(aliao,«)  l,j,a,val 

ll(id(j,i),B)  a  qalpbaoaval 
goto  1100 

1000  foxmat(al32) 

9999  eoatiaao 
rotara 
oad 


C 

C 

C 
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roaetioa  asmrps 


c 
c 

C  PaxpoM: 

C  This  itt&ctioa  idsntifisa  shsthsr  a  lin*  is  a  character 

C  iapat,  data  input  or  eoanoat. 

C 

C  _ 

fuaetioa  6ETTTPE(stria() 

C  OLOBiLS 

charactsr«132  string 
C  LOCALS 

iatogor  0ETTTPE,ctyp«(10) 
eharactor*!  hoad(lO) 

data  haad  /•!*,'«*, *S‘ , 'S' , 'X' . 'A* *C* , »c* , »  '/ 
data  ctypo 

C  LOGIC 

OETTYPE-1 
do  100  i«l,10 

if  (striagd:!)  .oq.  h«ad(i})  GETTYPEsctypa(i) 

100  eontinno 
# 

rotura 

«nd 


File:  solver. f 


C>Modttlo  SOLVER 

C>Pttrposo  SolTos  tho  systoa  of  linoar  sjmnotric  oquations 

CsAuthor  who  kaovs 

C«Dato 

CsOpdato  Jaanarj  1989  by  E.  Praooao 
CsBlock  Fortran 

C  SOBROOTIBE  SOLVERCBK.BR.JDIAG.HEQ.IFLAG) 

roenrsivo  SUBROOTIIE  SOLVER(BK.BR,JDIAG,HEq,IFUG} 

C* - 

C  PURPOSE: 

C  THIS  SOBROUTZIE  SOLVES  THE  SYSTEM  OF  LINEAR  SYMMETRIC 

C  EQUATIONS  IN  VECTOR  FORM  USING  TEE  CROUT  REDUCTION 

C  METHOD. 

C 

C  ARGUMENTS: 

C  BE  >  GLOBAL  STIFFNESS  EQUATIONS  IN  V^'CTOR  FORM 

C  BR  •  GLOBAL  LOAD  VECTOR 

C  JDIAO  >  LOCATION  VECTOR  FOR  DIAGONALS  IN  [BK] 

C  NEQ  >  NUMBER  OF  EQUATIONS 

C  IFUG  -  FUG  INDICATING  HBICH  FUNCTION  IS  TO  BE  PERFORMED 

C  1  •>  FORVARD  REDUCTION 

C  2  >>  BACXVARD  SUBSTITUTION 


+C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 

C 


« 
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c 


c 


C  AROUIIEITS 

JUUL*«  BK(i),  U(l} 

nmon  JozAa(i).  meq.  xfuq 

C  LOCAL  VAEZABLES 

BSAL*8  ZEKO.  BZEBO.  TOL.  DAVAL.  DOT.  D.  ROD.  DD 
ZITEOER  LDFUO.  JR.  J.  JD.  JB.  ZS.  ZE.  X.  JDT 
ZITEGER  JJ.  ZD.  Z.  ZR.  ZH 


C 

C 

C 

C 


C 

C 

C 

C 


C 

10 


C 

C 

c 

c 


c 

c 

c 

c 


20 

C 

c 

c 


JJ  >  6 


NEW  PARAMETERS 


ZERO  >  0.000 
EZERO  a  0.3D-14 
TOL  a  O.SD-7 
LOFUG  a  0 


FACTOR  BX  TO  UTaDaO  OR  REDUCE  R 


JR  a  0 

DO  70  J  a  1,  NEC 
JO  a  JDZAG(J) 

JR  a  JO  -  JR 

IS  a  J  -  JH  ♦  2 

ZF  (JB  -  2}  60.  30.  10 

IF  (IFUG  .X£.  1)  GOTO  60 
IE  a  J  -  1 

X  f  JR  ♦  2 
ZD  a  JDIAG(IS-1} 


IF  DIAGONAL  ZS  ZERO  COMPUTE  A  NORM  FOR  SINGULARITY  TEST 


JOT  a  JOIAG(IE)  *  1 

IF  (BX(JO)  .EQ.  ZERO  .AND.  IFLAG  .EQ.  1)  THEN 
CALL  DATEST  (BX(JDT).  JB-2.  DAVAL) 

END  IF 


REDUCE  ALL  EQUATIONS  EXCEPT  FIRST  ROW  AND  DIAGONAL 

DO  20  Z  a  IS.  ZE 
ZR  a  ID 
ZD  a  JDZAO(I) 

ZH  a  MIMO(ID-IR-l,I-ISai) 

IF  (IB  .GT.  0)  BX(X)  a  BX(X)  -  DOT(BX(X-IH) .  BX(ID-IH),  IH) 
X  a  X  ♦  1 
CONTINUE 


REDUCE  FIRST  ROW  AMD  DIAGONAL 
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IF  (ZFua  .IS.  1)  aoTO  so 
ZR  ■  JS  4’  1 
ZS  «  JD  >  1 
S  ■  J  -  JO 
DO  «  BK(JD) 

DO  40  Z  «  ZS,  ZE 
ZD  •  JDZAG(X«Z} 
zr  (Bx(ZD)  .sq.  o.o)  goto  4o 
0  >  BS(Z) 

BX(Z)  •  BX(Z)/BX(ZD) 

BX(JD)  »  BX(JO)  -  D*BX(Z} 
COITZIUE 


CHECK  FOR  FOSSZBLE  ERRORS  AID  PRZXT  VARNZNGS 


ROD  •  BK(JD) 

ZF  (DiBS(ROD)  .LT.  TOL*DABS(DD))  WRZTE  (JJ,2000)  J 
ZF  (DO  .LT.  ZERO  .AID.  ROD  .6T.  ZERO)  WRITE  (JJ.2001)  J 
ZF  (DO  .GT.  ZERO  .AID.  ROD  .LT.  ZERO)  WRITE  (JJ,2001)  J 
IF  (DABS(ROD)  .LT.  EZERO)  WRITE  (JJ.2002)  J 


COKPLETE  RAIX  TEST  FOR  A  ZERO  DIAGOIAL  TEST 


ZF  (OD  .EQ.  ZERO  .AID.  JR  .GT.  0)  THEN 

ZF  (DA8S(RDD)  .LT.  TOL*DAVAL)  WRITE  (JJ,2003)  J 

END  IF 


REDUCE  RIGHT  HAND  SIDE 


IF  (IFUG  .EQ.  2)  BR(J)  ■  BR(J)  -  D0T(BK(JR+1) ,  BR(IS«1),  JH-1) 
JR  «  JD 
CONTINUE 

IF  (IFUG  .IE.  2)  RETURN 


OZYIDE  BT  DIAGOIAL  TERRS 


DO  80  Z  >  1,  lEQ 
ZD  •  JDIAG(Z) 

IF  (BK(IO)  .IE.  0.0)  BR(I)  «  BR(I)/BX(ID) 
ZF  (BR(I)  .IE.  ZERO)  LOFUG  •  1 

coirnuE 


CHECK  FOR  ZERO  LOAD  VECTOR 


IF  (LDFUG  0)  HBrrE(JJ,2004) 


BACK  SUBSTITUTE 


J  >  lEQ 
JD  »  JOXAG(J) 
D  •  BR(J) 

J  >  J  •  1 
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IF  (j  .LS.  0)  lurnmN 
JK  >  JDUa(J) 

IF  (JD  -  JR  .LI.  1)  OOTQ  110 
XSaJ-JO^JR-fa 
X  >  JR  >  IS  4>  1 
DO  100  !■  IS,  J 

BR(I)  •  BRd)  -  BK(ItK}»D. 

IOC  COiniMDB 
110  JD  ■  JR 
80T0  90 
C 

C  - 

C  tfARinO  FORMATS 

2000  FORMAT(/*ll  VARRIMO  i I  1  •  II  SOLVER,  LOSS  OF  AT  LEAST  7  DIGITS’ 

4  /18Z.  *11  REDOCIVa  DIAGOMAL  OF  EQOATIOX:*.4X.I5} 

2001  FORMAT(/M!  VARMIMG  1 1  2  -  IX  SOLVER,  SI8M  OF  DIAGONAL  CHANGED* 

^  /18Z.  *VRXN  REDUCING  EqUATI0M:*,16Z, IS) 

2002  F0RNAT(/*ll  VARMIMG  ! I  3  -  IN  SOLVER.  REDUCED  DIAGONAL  IS  ZERO' 

4  /18X.  ’FOR  EqUATI0N:*.2SX,IS) 

2003  FORXAT(/>il  VARMIMG  1 1  4  •  IN  SOLVER.  RANK  FAILURE  FOR  A  ZERO* 

*  /18X.  'UNREDUCED  DIAGONAL  IN  EQUATION; * ,7X, IS) 

2004  FORXAT(/*il  VARMIMG  ! 1  6  •  IN  SOLVER,  ZERO  LOAD  VECTOR*) 

C 

END 

C«End  Fortran 
C«Nodul«  DATEST 
C>Block  Fortran 

C  SUBROUTINE  DAT£ST(A,JH.OAVAL) 

racnraiva  SUBROUTINE  DATEST(A,JH,OAVAL) 


C*— - - - - - — - - - - +C 

C  c 

C  TEST  FOR  RANK  C 

c  c 

C  INPUTS;  C 

C  A(J)  -  COLUMN  OF  UNREDUCED  ELEMENTS  IN  ARRAY  C 

C  JH  -  NUMBER  OF  ELEMENTS  IN  COLUMN  C 

C 

C  OUTPUTS; 

C  DAVAL  -  SUM  OF  ABSOLUTE  VALUES  C 

C  C 

c* - - - - - +c 

c 

C  ARGUMENTS 


REAL*8  A(l),  DAVAL 
INTEGER  JB 

C  LOCAL  ARGUMEXTS 

INTEGER  J 
C 

DAVAL  >  O.ODO 
DO  10  J  «  1,  JH 

DAVAL  •  DAVAL  *  DABS(A(J)) 
10  CONTINUE 
C 

RETURN 

END 
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o  o 


T 


c 

c 

CaEad  Fortran 
CaModttlo  DOT 
CaBloek  Fortran 
C  FOICTXOI  00T(A.B.V) 

roeartivo  FDICTZOM  D0T(A.B,I) 


C  FOllPOSB:  C 
C  TBZS  FOMCTIOI  SOBKOOTin  PERFO&XS  TEE  DOT  PRODUCT  OF  TWO  C 
C  TICTOES.  C 
C  C 
C  AR6UREMTS:  C 
C  A  -  FIRST  VECTOR  XIYOLV^D  IE  DOT  PRODUCT  C 
C  B  -  SECOfD  VECTOR  XEVOLVED  IE  DOT  PRODUCT  C 
C  E  -  EUMBER  OF  ELEKEETS  ZE  EACH  OF  THE  TVO  VECTORS  C 
C— —————————c 


REAL«8  DOT,  A(l),  B(l) 
lETEQER  E 
C 

lETEOER  Z 
C 

DOT  ■  0.0 
DO  10  I  >  1,  E 

DOT  ■  DOT  ♦  A(I)*B(I) 
10  COETIEUE 
C 

RETURE 

EED 

C«End  Fortran 


File:  nophlag.T 


C>Hodnl«  EOPHUO 
C>Attthor  X.  Alvin 
C«Dat«  July  1990 
CaBlock  Fortran 

C  - 

c 

C  Sabrovtino  E0PHLA8 
C 

C  Purpoao : 

C  nia  sabrontino  oolvoa  ior  tho  ■tmctoral  ditplacaaont 

C  and  Tolocity  voetora  at  tha  hal2>atap  lor  tho  phaaa  lag 

C  eorraetion  loop,  and  gata  nan  Boaonranont 

C 

C  - - - 

c 

C  Argaaanta 

C  dalbota  ^  dalta  «  bdanp 

C 


I 


aabroatina  EOPHLAG(zp) 

roal«8  zpd) 
inelada  'aharad.ine* 
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LOCAL  VARIABLES 


C 

int«g«r  i 
r«al*8  vdlAZOOF) 

C  LOQIC 

C  ADD  APPLIED  FORCES  TO  BBS  AHD  PREPARE  HASS  MULTIPLIER 

do  10  iBl.ndof 
*i(i)  ■  gi(i)  ♦  f(i) 

▼(i)  >  (1.  >  d«lto*adu^>)*q(i}  *  doltA«qdot(i} 

10  contiaoo 

C  SOLVE  FOR  RIGHT  HAND  SIDE,  go 

do  77  i  ■  l,ndol 

go(i)  ■  doliq*go(i)  ♦  T(i)*mao«(jdiag(i)) 

77  continao 

if  (bdaap  .no.  0.)  thon 
dolbotn  «  doltaobdaap 

call  PMVMAD (atif,jdiag,q, ndof ,dolbota,g8,l.d0) 
endif 

C  SOLVE  FOR  DISPUCEXENT,  q,  USING  RHS  AND  MATRIX  S 

call  S0LVER(oo,ga, jdiag.ndof ,2) 

do  100  i«l,ndof 
v(i)  »  (g«(i)-q(i))/dolta 
100  continno 

call  ZEROVECTCzp.nion) 

do  200  jj  >  l.hdval 
i  ■  hdrooCjj} 
j  ■  hdcol(jj) 

zp(i)  •  zp(i)  ♦  hd(jj)*go(j) 

200  continao 

do  2S0  jj  a  i,bTval 
i  a  hTrow(jj) 
j  a  hTcoKjj) 

zp(i)  a  ap(i)  ♦  hT(jj)av(i) 

250  continue 

rotnrn 

ond 


File:  zerovect.f 


CsModalo  ZEROVECT 

CaPorpoto  Initializo  voctor  of  givon  longtb  to  zoro 
CaAnthor  X.  Alvin 
CaDato  May  1990 

C  — - 
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Subrontia*  ZEROVECT 


C 
C 
C 
C 
C 

sttbroutia*  ZEROVECTCT.a) 

r«al«8  v(l) 
lattgar  a 

do  100  ial,a 
▼(i)  >  O.dO 
100  coatiaao 

rotaxa 

•ad 


File:  lu.f 


SOBROUTINE  LOFACTd ,R .PIVOT, DET , lER ,NNAX) 


c 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


SUBROUTINE  FACTOR  USES  GAUSSIAN  ELIMINATION  WITH 
PARTIAL  PIVOTING  AND  IMPLICIT  SCALING  TO  DETERMINE 
THE  L*U  DECOMPOSION  OF  i.  SQUARE  MATRIX  "A"  OF 
ORDER  N.  THE  ALGORITHM  ALSO  FINDS  THE  DETERMINENT 
OF  "A".  UPON  COMPLETION,  THE  ELEMENTS  OF  THE  UPPER 
TRIANGULAR  MATRIX  "U'<  ARE  CONTAINED  IN  THEIR  RESPECTIVE 
LOCATIONS  IN  MATRIX  "A".  THE  ELEMENTS  OF  MATRIX  "L" 

ARE  CONTAINED  IN  THE  LOVER  TRIANGULAR  PORTION  OF  "A", 

BUT  ARE  SCRAMBLED  WITH  RESPECT  TO  "U"  BECAUSE  OF  ROW 
INTERCHANGE  OPERATIONS  NOT  PERFORMED  ON  THE  ELEMENTS 
OF  "L".  THE  VECTOR  PIVOT  (SEE  BELOW)  MUST  BE  USED  TO 
UNSCRAMBLE  "L"  IF  IT  IS  TO  BE  USED  FOR  OTHER  OPERATIONS. 

VARIABLES:  A>FULL  SQUARE  MATRIX  (DOUBLE  PRECISION) 

NaORDER  OF  MATRIX  A  (INTEGER) 

PIVOTaVECTOR  CONTAINING  A  RECORD  OF 
ROW  INTERCHANGES.  THE  INTEGER 
VALUE  PIVOT(K)  IS  THE  ROW  WHICH 
WAS  INTERCHANGED  WITH  ROW  K  AT 
FORWARD  ELIMINATION  STEP  K.  (INTEGER) 
OETaDETERMINENT  OF  MATRIX  A  (DOUBLE  PRECISION) 
lERaERROR  FUG.  IF  IER«1,  THE  MATRIX  A  WAS  TOUND 
TO  BE  SINGUUR,  AND  THE  ROUTINE  WAS  EXITED.  IF 
lERaO,  THE  DECOMPOSITION  WAS  SUCCESSFUL. 


Caa«aaaa*««««««»««*««4i4i««4i4i««««««¥aaaaa««i*«i»*aaaaa*aaaaaaaaaaaa«a 

INTEGER  PIV0T(1),IER,N,I,J,K,I0,NMAX 
REALaS  A(NMAX.l) ,S(1000) ,C(1000) ,DET,TEMP 
DETal.ODO 

Caaaaaaa«aaaaaaa«aa«««««aaaaaaaaaaaaaaaaaaaaaaa«a«aaa«««aaaa«a»aa 

C 

C  FIND  THE  ROW  NORMALIZING  COEFFICIENTS  S(I)  FOR  IMPLICIT  SCALING. 

C  EXIT  ROUTINE  IF  ANT  S(I)aO.O 
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DO  100  It-l.M 
S(X)>O.ODO 
DO  110  J«1.N 

zr  (ABSa(I.J}).aT.S(Z))  S(Z)>ABS(i(I.J)) 

110  COMTHUB 

IF  (SCD.Sq.O)  THElt 
IER«1 
DET>O.OLO 
Mcmi 
EVD  IF 

100  coimoE 
c 

C  START  FORVARD  ELIMIHATIOM  STEP  X 

C 

DO  130  K>1.H>1 

c 

C  DETERMIHE  PIVOT  ELEMEHT  A(IO,K)  BY  FINDING  THE  ROW  10 

C  BETWEEN  K  AND  N  CONTAINING  THE  HAXIXUN  NORMALIZED 

C  VAL0E  IN  COLUMN  X.  SET  PIVOT(X)*IO 

C 

Q:$m*mm*mm*m*mm*mm**mmmm**mmmmmm*m*m«mmm*mm**m****m*m***m*m»m**mmm 
C(X)>O.ODO 
DO  130  I>K,N 

TEMP«ABS(A(I,X)/S(I)) 

IF  (TEMP.GT.C(X))  THEN 
C(X)»TEMP 
IO»I 
END  IF 
130  CONTINUE 
PIVOTCX)«IO 

Q*;$m*m*m*m**mmmm**mm0mm*m*mmm**mmmmmm***mmmm*mm**********m*m***»* 

C 

C  EXIT  ROUTINE  IF  ALL  VALUES  IN  COLUMN  X  AT  OR  BELOW 

C  THE  MAIN  DIAGONAL  ARE  EQUAL  TO  0.0 

C 

IF  (C(X).Eq.O.O)  THEN 
IER«1 
DET>O.ODO 
RETURN 
END  IF 

c 

C  INTERCHANGE  ROWS  10  AND  K  FOR  COLUMNS  X  TO  N.  SKIP  IF  IQsK. 
C  SET  DET>-DET  IF  ROWS  ARE  INTERCHANGED. 

C 

C^m**mmmmmm*m**t»**mmm***0**m**m***mm*****mmm*m***m»***mm*mmmmit*m* 

IF  (lO.EQ.X)  GOTO  ISO 
DET«-1.0D0*DET 
DO  140  J«X,N 
TEMP>A(X,J} 

A(K.J)»A(IO,J) 

A(IO.J)>TEXP 
140  CONTINUE 
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no  onnoooo 


ELZMIXATS  COLUIOI  K  BELOV  MAZE  OZAOOVAL  BY  XULTZPLYZVQ 

BOV  K  FBOM  COLUni  K  TO  V  BY  A(Z.K}/A(X,K)  AVD  SUBTRACTZHO 

FEON  BOH  Z.  STOBE  TEE  KULTZPLZEB  FOB  BOV  Z  ZH  THE  ELZKZNATED 

COLOMM  E.  XULTZPLY  THE  BOnZMa  PBOOOCT  OET  BY  DZAGONAL  ELEMEHT  A(K,X). 


150  DO  160  Z>K>1,H 

A(Z.E)>A(Z.X)/A(X.E) 

DO  170  J-X41.I 
A(Z.J)»A(Z,J)-A(Z,X)*A(X,J) 
170  COHTZHUE 

160  COHTZHOE 

DET>DBT*A(X.X) 

120  COXTZVUE 


C  CHECX  UST  BOV/COLUNH  FOB  SZNGULABZTY.  ZF  THEBE  IS  NO  ERROR, 

C  COMPLETE  CALCUUTZON  OF  THE  DETEBMZNEMT .  SET  THE  ERROR  FLAG 

C  TO  ZMDZCATE  NORMAL  COMPLETZON,  AND  EXZT. 

C 

IF  (A(N.M).Eq.O.O)  THEM 
IER«1 
DET>O.ODO 
BETDBM 
END  IF 

DETaOET^ACN.N) 

IEB«0 

BETORN 

END 

SDBRODTINE  Ui j^''E(A ,N,B .PIVOT ,NMAX) 


C 

C  SUBBODTINE  SOLVE 

C 


INTEGER  PZV0T(1},H,I,J,K,NNAZ 
BEAL«8  A(XMAX.1).E(1},TERP 
DO  100  X«1,X-1 

IF  (PZVOT(X}.Eq.X)  GOTO  110 
T£MP>B(X) 

B<X)»B(J) 

B(J}>TEMP 

110  DO  120  ZaX^l.N 

B(Z)aB(Z)-A(Z,X}aB(X} 

120  CONTZNOE 

100  CONTINUE 

B(N)-B(M)/A(N,N) 

DO  130  ZaH-1,1,-1 
DO  140  Jal-fl.N 

B(I)aB(I)-A(I,J)aB(J) 

140  CONTINUE 

B(I)aB(I)/A(I,I) 

130  CONTINUE 
BETDBM 
END 
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C>END  PORTIUI 
c>DECX  FACTA 

caPURPOSE  -  Factors  th*  A  Mtrix  as  L  U  a  A,  with  partial  pivoting 
caAUTHOR  V  K  BBLYIV.  Sapt.  24.  1987 
e 

e  Input 

e  aaat~>-'>Ca  X  n]  Matrix  to  bo  factorod,  dostroyod  on  output 

c  up— — probloM  siso 

c 

c  Output 

e  SMat — --contains  the  LU  dacoaposition 

c 

Bubroutiaa  FACTA(aaat.np,Bro«,lp) 
c 

raalaS  aaat(«).ata 
intogar  lp(*) 
c 

do  50  ial.np 
60  lp(i)ai 
c 

c  Find  largast  pivot, 
c 

do  100  kal,np-l 
anaxkaO. 

BSoaxaO 

do  200  aak.np 

if  (abs(aaat(lp(tt}4'(k-l)«nros})  .gt.  amaxk)  than 
aaaxk«abs ( anat (lp(a} a (k- 1 } anroo) ) 

BBULZ*S 

«adif 

200  continu# 
c 

lalp(k) 

lp(k)alp(BBax) 

lp(BBBax}al 

c 

do  400  iakal.np 

ataaaMt(lp(i}a(k-l}anrov}/aBat(lp(k)a(k-l}*nrov} 
aBat(lp(i}a(k-l}aBros}sata 
do  500  jakal.np 

aMat(lp(i)+'(j-l)anrou)»aaat(lp(i)+(j-l)*nrov)- 

ata«aHat(lp(k)'»(j-l}*nrov) 

500  continua 

400  continua 
c 

100  continua 
e 

ratum 

and 

C  EHO  FORTRAX 
c«DECX  LUSOLV 

caPURPOSE  -  Solva  L  U  x  •  b. 
caAUTHOR  V  X  BELVn,  Sapt.  24.  1987 
c 

c  ————————————— — — — — — 
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c  First  solTSs  L  7  ■  b,  tbsa  11  x  ■  y 
e 

c  lapat 

c  smat******'- Ca  Z  a]  utrlz  laetorsd  by  FACTA 

c  ap— problsa  sias 

e  Ip  o-poiatsr  vsetor  bassd  oa  pivotiag 

c  rks~— *RBS  of  oqaatioa 

e 

c  Output 

c  saat'^'—eoataias  tbs  LU  dseoapositioa 

e  X— — — tbs  Bolutioa  vsetor 


e 

c 

subroutias  LnSOLV(saat ,ap ,azov  tip ,rbs  tx) 
c 

roal*8  aaat(s),z(s),rbs(s) 
iatsgsr  lp(*) 
c 

do  SO  i«l.ap 
x(i)«rb8(i) 

50  coatlaus 
c 

e  Solvs  Lovsr  Systsa — — — - - - 

cmmmm  Qutsr  loop 

do  100  bsl,ap 
rbs(k)*x(lp(b)) 
if  (rbt(k)  .sq.  0.)  go  to  100 
c 

e«s««  laasr  loop 
c 

d~  200  isk^ltOp 

z(lp(i))>z(lp(i))*-aBat(lp(i)'»'(k-l)sBrov)*rbs(k) 
200  coatiaus 
100  coatiaus 
c 

c  Solvs  Uppsr  Systsa— 
c 

do  300  k«op,l,-i 

x(k)>rbs(k}/saat(lp(k}'»(k<-l}«orov) 
do  400  i>l,k>l 

rbs(i)>rbs(i)->z(k)«sBat(lp(i)'»(k*‘l)saro«) 

400  coatiaus 
300  coatiaus 
rstura 
sad 


File:  prepcon.f 


C>Koduls  PREPCOI 

CsPurposs  Prsproesss  coatrol  saalysis  modulo  for  ACSIS 
CsAutbor  X.  Alvia 
C>Dats  Juas  1990 
C^Block  Fortraa 

C  - 

c 

C  Subroutias  PREPCOM 
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o  n  o  o  o 


c 

C  Purpoft: 

C  Thin  ■nbroatia*  pr«pu«s  te,  th*  eoatrol  pradiction  iatagration 

C  aatrix  tad  ao,  tha  obaarvar  coaatract  aatrix  S  (MadaltaaD'tdalsq^K) 

C 

C  - - - - - 

c 

c 

■ubroatiaa  PREPCOH 

iaelada  'aharad.lae* 

C  LOCAL  VARIABLES 

raal*8  me .kc 
latagar  iar 

C  LOGIC 

call  READCON 

Fora  Coatrol  Pradictioa  latagratioa  Coafliciaat  Matrix 

coatypa  >  •!  Fall  Stata  Faadback 

coatypa  «  0  Luaabargar  Obaarvar 

coatypa  •  Kalaaa  Filtar 

do  10  1  •  l,aact  *  aaaa 

do  20  j  •  l,aact  *  aaaa 

•e(i.j)  •  O.dO 
20  coatiaaa 

10  coatiana 

if  (coatypa)  100,200,400 

100  acai  «  aact 

do  110  i  a  i,oact 
do  120  jj  a  l,bTal 
j  a  bcol(jj) 
k  a  bpoa(jj) 

•c(i,j)  a  ac(i,j)  ♦  dalta*f2(i,k)*b(jj)/maai(jdiag(k)) 

120  coatiaaa 

110  coatiana 

goto  600 

200  acai  a  nact  *  aaoa 

do  210  i  a  l,aact 
do  220  jj  a  l,b.al 
j  a  bcol(jj) 
k  a  brovCjj) 

•e(i,j)  a  ac(i,j)  ♦  daltaaf2(i,k)*b(j j)/Baat(jdiag(k)) 

220  coatiaaa 

do  240  j  a  Baetal,acai 
do  260  k  a  l,adof 

ae(i,j)  a  ac(i,j)  *  daltaaf2(i,k)al2(k, j-aact) 
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250  eoatiauc 

240  eoatiau* 

210  eoatiaa* 

do  260  ii  ■  l.hTval 
i  ■  aaet  ♦  hTToa(ii) 
do  270  jj  >  l.bvaX 
j  •  beol(jj) 
k  ■  brow(jj) 

if  (kTcolUi)  .ao.  k)  goto  270 
•e(i,j)  ■  oed.j)  ♦  dolta*hv<ii)*b(jj)/aa«i(jdiag(k)) 
270  eoatiano 

do  290  j  >  aaet41,Besi 
k  ■  kveol(ii) 

•e(i,j)  ■  oed.j)  ♦  dolta*bv(ii)*12(k,j-nact) 

290  eoatlaao 

260  eoatlaao 

goto  600 

400  Bcsi  >  aact  *  noon 

do  470  i  •  l,nact 
do  480  jj  «  l.bval 
i  •  bcol(jj) 
k  •  brow(jj) 

oe(i.j)  «  ocCi.j)  ♦  dolta*12(i,k)ob(jj)/Bno,(jdiog(k)) 
480  eontinao 

do  600  j  >  Baet«l,acai 
do  610  k  >  l.ndol 

oed.j)  •  ocd.j)  ♦  dolta*12d,k)*12(k,j-aoct)/ 

anit(jdiag(k)) 

510  eoatlaao 

600  eoatlaao 

470  eoatlaao 

do  620  11  «  l.bvval 
1  •  aaet  ♦  bTrovdl) 
do  630  jj  s  i,bval 
j  ■  beol(jj) 
k  •  bro»(jj) 

it  (bveoldl)  .ao.  k)  goto  530 

ocd.j)  «  oed.j)  ♦  dolta*hvdl)*b(jj)/mafa(jdiag(k)) 
630  eoatlaao 

do  560  j  a  aactol.ncal 
k  a  hTcoldl) 

•ed.j)  a  oed.j)  ♦  dolta*htrdl)ai2(k.j-aact)/ 
Baoa(jdlag(k)) 

660  eoatlaao 

620  eoatlaao 

600  eoatiano 

do  1100  1  a  i,ncal 

oeCl.l)  a  ocd.l)  ♦  l.dO 
1100  eoatlaao 

C  FACTORIZE  oc 

call  rACTACoc.acsl.MAXCSI.plvot) 
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if  (i«r  .tq.  1)  th«a 

priat  *,*PRIPCOV:  Slafalar  Matrix  for  Coatrol  latogration* 
•adlf 

C  Form  Obsarrar  Xatagratioa  Coalflciaat  Natrix»  ao 

ae  •  i.  ♦  dalta*adaap 
ke  •  daltaabdaap  *  dalaq 
do  1200  ial.alaa 
oo(i)  ■  aeauaaCi}  *  ke*atlf(i) 

1200  coatiaaa 

C  FACTOMIZS  ao 

call  S0LVER(ao,2o,jdla(,Bdof ,1) 

C  laitialiaa  Obaarvar  Stataa 

call  ZEROVECKqa.adof) 
call  ZEROVECT(qadot.Bdof) 
call  ZEROVECTCpa.adof) 

ratora 

and 


File:  control. f 


CsHodola  COHTROL 
C«Author  K.  ilvia 
CsData  Nay  1990 
C>Block  Fortraa 

C  - 

c 

C  Sttbrontiaa  CONTROL 

C 

C  Parpoaa: 

C  Thii  aabroatiaa  carriaa  oat  tka  atmaric  xatagratioa  of  ona  tima 

C  stop  of  tho  coatrol  systaa. 

C 

C  - 

c 

C  Argaaaata 

C  qop  •  oatiaatad  displacoaaat  vactor  at  half  tima  stop 

C  qadotp  •  aatiaatod  ralocity  vactor  at  half  tiao  atop 

C  PP  ~  gaaaralixad  aoaaataa  (f-Daqadotp-K*qap} 

C  X  >  aaaaarod  saasor  output 

subroutiaa  CONTROL(x) 

iacluda  'aharad.iac' 
raal«8  z(l) 

C  LOCAL  VARIABLES 

raal«8  qap(KAXDOF) ,qadotp(MAXDOF) .ppCKAXDOF) .v(HAXDOF) 
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C  LOGIC 

C  Fora  IBS  o2  Co&trol  Prodietioa  E^aatioa  Sot 

C 

C  eoatjpo  ■  *1  Fall  Stato  Foodbaek 

C  eoatjpo  ■  0  Laoabargor  Obaarror  aitb  LI  >  0 

C  eoatjpo  ■  01  XalaaB  Filtor  w/{oaoralizod  noaoataa  variablo 

eall  Z2IOVXCT(sc,aeai} 

if  (eoatjpo)  100,200,300 

100  eoatiaao 

do  110  i  a  l,ado< 
qo(i)  a  q(i) 
qodot(l)  a  qdot(l) 

110  eoatiaao 

200  eoatiaao 

do  210  i  a  i.ndof 

qop(i)  a  qo(i)  *  dolto«qodot(i) 
qodotp(i)  a  qodot(i) 

pp(i)  a  t(i)  -  Baoa(jdiag(i))aadoap*qodotp(i) 

T(i}  a  qop(l)  ^  bdonpaqodotpd) 

210  eoatiaao 

eall  PMVlUD(otil,jdiag,y,adoi,-l.dO,pp,l.dO) 

do  220  i«l,aact 
do  230  j  a  l,Bdof 

ge(i)  a  ge(i)  -  il(i, j)*qop<j)  -  f2(i, j)a(qodot( j)  ♦ 
doltaapp(j)/aaoo(jdiag(j))) 

230  eoatiaao 

220  eoatiaao 

ii  (aeoi  .oq.  aaet)  goto  600 

do  240  iaaaetol,aesi 
k  a  i  -  aaet 
ge(i)  a  z(k) 

240  eoatiaao 

do  246  ii  «  l.hdval 
i  a  bdrow(ii)  *  aaet 
j  a  Hdcol(ii) 

gc(i)  a  gc(i)  -  hd<ii)aqop(j) 

246  eoatiaao 

do  260  ii  a  i.hTval 
i  a  hTxoaCii)  *  aaet 
j  a  hvcol(il) 

gc(i)  a  ge(i)  -  bv(ii)*(qodot(j)+dolta*pp(j)/maso(jdiag(j))) 
260  eoatiaao 

goto  600 

300  eoatiaao 

do  310  i  a  l,adoi 
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310 


330 

320 


340 


345 


3S0 


q«p<i)  •  q*(i) 

pp(0  «  f(l)  -  ■Mt(jdlag(i))**d»jBp*a#p(i)/(i«it* 

v(i)  ■  (1  ♦  Muq>/d*lt«)*q«p(i) 

eoatian* 

call  PllVlUl)(atii,jdiag,T,adof t*l.d;o,pp,l.d0) 

da  320  i>l,aact 
do  330  j  •  l.adof 

geCi)  -  gc(i)  -  fl(l.j)*qap(j)  -  f2(i, j)*(p,(j)  ♦ 
dalta*pp(j))/«a*«(jdiag(j)) 

eoatiau* 

eoatiaaa 

do  340  i>aaet^l,ac«l 
k  ■  i  -  aaet 
gc(i)  ■  a(k) 
eoatiau* 

do  346  ii  ■  l.hdval 
i  ■  kdrow<ii)  ♦  nact 
j  •  kdcol(ii) 

gc(l)  ■  gc(i)  -  M(ii)*q*p(j) 
eoatiau* 

do  360  ii  ■  l,h*v*l 
i  •  kTro»(ii)  ♦  aact 
j  ■  kvcol(ii) 

gc(i)  «  gc(i)  -  liY(ii)*(p*(j)  ♦  d*lta*pp(j))/ma8*(jdiag(i)) 
co&tiaa« 


C  FIND  r,  COHTROL  AKD  STATE  CORRECTION  FORCES 

600  call  LDSOLV(*c,aeii,NlXCSl, pivot, gc,r) 

do  610  j»l,aact 
a(j)  •  r(j) 

610  eoatiau* 

do  620  j»aact+l,ac*i 
g*BBa(j-aact)  «  r(j) 

620  eoatiau* 


C  FIND  CONTROL  CONTRIBUTION  TO  RHS  VECTOR  FOR 
C  OBSERVER  AND  STROCTRE 

do  710  i«l,adof 
g*(i)  •  O.dO 

go(i)  ■  O.dO 

gk(i)  «  O.dO 

710  eoatiau* 

do  720  jj«l,bval 
i  »  brow(jj) 
j  »  beol(jj) 

g«(i)  ■  g*(i)  +  b(jj)*u(j) 

go(i)  «  go(i)  ♦  b(jj)*u(j) 

gk(i)  «  gk(i)  ♦  b(jj)*tt(j) 

720  coaeiau* 

ii  (coatyp*  .*q.  o)  th*a 
do  726  i  ■  l.adof 
do  730  j«l,a**a 

*  ■*»»<jdi*g(i))*12(i,j)*gainma(j) 

730  eoatiau* 


725  eoutiau* 

(eontyp*  .aq.  1)  thaa 
do  736  1  ■  l.adof 
do  740  jal.aaoa 

|o(i)  ■  go(i)  ♦  (12(i,j)a*at8(jdiag(i))all(i,j)/dalta) 
ag«auL(j} 

gk(i)  -  gk(i)  ♦  12(l.j)*ga«wi(j) 

740  coatlaaa 

735  eoatiana 

aadii 

ratara 


File:  secorder.f 


C>Kodala  SECOROER 
C«iuthor  K.  Alvia 
C>Data  Kay  1990 
C>Block  Fortran 

C  - 

c 

C  Subroot Ina  SECOROER 

C 

C  Porpoaa: 

C 

C  Solvat  tha  aacond-ordar  dynaiudcal  aquation: 

C 

C  Kx"  ♦  Da*  ♦  Kx  »  «  ♦  g 

C 

C  at  tiaa  (n+1)  givaa  l(n'H/2),  g(n+l/2)  and  x,x’  at  n  by 

C  tba  aidpolnt  iaplicit  intagration  rola. 

C  Stap  slxa  is  2*dalta. 

C 

C  0  is  of  tha  fors  (alphaaM  *  bata^K),  f  is  an  appliad  forca, 

C  and  g  is  assonad  to  ba  othar  appliad  forca  from  a  faadback 

C  control  loop.  Tha  Mtrix  Z  is  tha  factor ad  fora  of  th« 

C  intagratioa  coafficiant  aatrix:  E>(N  *  dalta*D  *  dolta*2*K) . 

C 

C  - 

c 

C  irgoaants. 

C 

C  a  >  aatrix  K 

C  k  -  aatrix  K 

C  alpha  -  scalar  alpha 

C  bata  *  scalar  bata 

C  f  •  Forca  vactor 

C  g  -  Faadback  forca  vactor  g(n'*’l/2} 

C  a  •  aartix  E 

C  X  •  Variabla  vactor  x(n} 

C  xd  >  Variable  vactor  x'(n) 

C  delta  >  Half  of  intagration  tiaa  stap 

C  dalsq  >  dalta*2 

C  j4iag  ■*  Diagonal  location  pointer  for  M,X,E  matricos 

C  ndof  >  Hnabar  of  aquations  and  length  of  q 
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C  r  -  BMs  Bsltipliar  lor  RHS  propuratlon 

C  dolbota  ■*  dolta  «  bot& 

C  aabroatino  SEC0R0Ell(m,b, alpha. b«t&,l,g,o,x,zd> 

C  dolta.dolsq.jdiag.adol.XiXOOF) 

roeartiTo  aubroatiao  SECOROERCB.k.alpha.bata.f.g.a.x.zd, 
dalta.dalaq, jdiag.adol .XAXOOF) 

c  AEOuxEirrs 

raal*8  b(1) ,k(l) .alpha.bata.Kl)  .jCD ,a(l) 
raal*8  z(l},xd(l},dalta.dalaq 
iatagor  jdiag(l) .adolihiZOOF 

C  LOCAL  VARIABLES 

a 

iatagor  i 

roalaS  t(3000} .dolbata 
C  LOGIC 

C  ADD  APPLIED  FORCES  TO  RHS  AND  PREPARE  MASS  MULTIPLIER 

do  10  i«l,adol 

g(i)  «  g(i)  ♦  l(i) 

▼(i)  >  (1.  >  dalta«alpha)*z(i)  *  daltaazd(i) 

10  eoatiaaa 

C  SOLVE  FOR  RIGHT  HAND  SIDE,  g 

do  77  iai.adol 

g(i)  a  dalaq*g(i)  ♦  v(i)*m(jdiag(i)) 

77  eontiauo 

if  (bata  .no.  0.)  than 
dolbata  ■  daltaobata 

C  Activato  EBE  cooputationa  lor  intaraal  lorca  bj  uaing  STIFFRC 
C  aabrontina.  Othorviao  nao  PNVNAD  (prolila  satrix/vactor  mult-add 

C  call  PNVNAD(k,jdiag.z.ndol, dolbata, g.l. do) 

call  STIFFRCCx.dalbota.g) 
andil 

C  SOLVE  FOR  DISPUCEKENT.  q.  USING  RHS  AND  MATRIX  E 
call  S0LVER(a.g,jdiag,ndol.2} 
dc  100  ial.ndol 

xd(i)  a  2.*(g(i)  -  x<i))/dalta  -  xd(i) 
x(i)  a  2.*g(i)  -  x(i) 

100  eoatiaaa 

rotarn 

and 


File:  measure. f 
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C>Modttl«  MEiSURE 
Ca Author  K.  Alvia 
C>Dato  May  1990 
C«Bloek  Fortraa  ■ 

C 

C  Sttbrotttiao  HEASURE 

C 

C  Furpooo: 

C  This  oubroutiao  otoroa  aav  ■oaaurad  aoaaor  data  by  uaing  tha 

C  prarioua  diaplaeaaaat  and  volocity  vactora  at  tha  aanaor 

C  locatioaa 

C 

C  - 

c 

C  Arguaaata 

C  <P  ~  aaaaurad  aaaaor  data  array 

C 

anbroutina  XEASUR£(zp} 

inclnda  'aharad.inc' 
raal«8  zp(l} 

call  2ER0VECT(zp.naan} 

do  100  jj  a  l.hdval 
i  a  hdro»(jj) 
j  a  hdeol(jj) 

zpCi)  a  zp(i)  ♦  hd(jj)aq(j) 

100  continua 

do  200  jj  a  l.hwal 
i  a  hTTOoCjj) 
j  a  hTeol(jj) 

zp(i)  a  zp(i)  ♦  hT(jj)*qdot(j) 

200  coatiaua 

ratura 

and 


File:  eigens.f 


CaNodula  EZGEXS 

C«Purpoaa  Find  Eiganoodaa  givan  Raaa,  StiiXnaaa  Matricaa 
CaAuthor  K.  Alvin 
CaData  March  1990 
CaBlock  Fortraa 

C  - 

c 

aabrontina  EIGEXS 
C 

C  - 

c 

C  CONXOI  AMD  GLOBALS 


iael«d«  ’■harad.ir.e* 


C  LOCAL  VARIABLES 

parui«t«r(llVM>100,IIHHVM>IUX00F«WM.XXClfV>imi*(NVM-^l}/2) 
iat«g«r  ial(IIAX00F),aTaeti|jtk,kktOttt 
r««l»8  vl(iaiinni),Tr(lQnrVN).«lck(KXCXV).utt()IXCHV) 
r««l*8  zxClIVM  .XVK) .  •isv(ltVM) ,  •Isold(NVX) 
r««l*8  tol«ig,toljae,OB«ga,ihs 

tolaiga.OOOl 
oat  ■  13 

toljac  >  tolaig 
nvoc  ■  Bi&0(2«n«ig,100) 
nvoe  •  Bi&0(nv«c,ndoX) 

C  SET  UP  ISL  VECTOR 

ial(l)  «  1 
do  60  ja2,ndof 

*  j  -  jdiag(j)  ♦  jdiag(j-l)  ♦  1 
SO  co&tinao 

C  CAU  EIGENSOLVER 

call  SSPACECttil  ,masa , vl , vr , aUc ,tjam,7at, oigv , oigold ,  isl , 
j  diag .  noi?; ,  nvoc ,  ndol ,  toloig ,  tol  j  ac ,  out ) 

C  WRITE  OUTPUT 

vrito(out,«)  >EIGEH  ANALYSIS  RESULTS:* 

¥rito(out,'*)  *  RADIAL  CYCLIC' 

vrlto(out,«)  '  MODE  EIGENVALUE  FREQUENCY  FREQUENCY* 

vrlto(out,«}  * -  -  — - -  - ’ 

vrita(oat,«) 
do  100  isl,Boig 

OBOga  >  daqrtCoigvd)) 

Ihz  •  OBOga/ (2*3. 141592664} 
vrito(oat,’(i6,3(3z,gl2.S)}*)  i,oigv(i) ,omoga,fhz 
100  contiano 

vritoCoat , *)  ' EIGENVECTORS : ' 
do  200  j«l,aoig,5 
*rito(oat,*) 
do  300  lol,ndof 
k  ■  Bdolo(j-l)  ♦  i 

■xita(oat , '  (15 ,6(  Iz  ,gl2 . 6)  } ' }  1 ,  (vrCkk)  ,kksk  ,k'*‘4ondof  ,ndof  ) 
300  coatiaao 

200  coatiano 

«rito(oat,*)  'HASS  MATRIX  DIAGONAL:' 
do  400  i>l,aap 
do  450  j«l,6 
if  (id(j,i)>a*>0}  tkoa 

»rito(ottt ,*)  i, j  ,id( j  ,i) ,aaM( jdiag(id( j ,1))) 
oadif 

450  coatiaao 
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400  coatiaa* 


r«tua 

•ad 

CaEad  Fortraa 


File:  singeig.f 


c- 

c 

e 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

e 

c 

c 

c 

c 

c 

c 

e 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


SUBKOUTZXS  SSPACE  (iX,AM.VL.VE.AKK,Ain.XX,EXOY.EIOOLO,ISL, 
1  IDIAQ.XBXO.XVEC.ltDOP.TOLElO.TOUAC.XV) 


iaput  :  ^ 

AX  :  ttiifaaBa  aatriz  (proXil*  valuts)  (NOOF) 

AN  :  eoaiiataat  ■•••  matrix  (profil*  valuat)  (NDOF) 

XSL  :  atoras  ia  poaltioa  "i"  th«  row  t  of  tip  of 

colnaa  "i"  (HOOF) 

XDIAG  :  poaitioa  of  diagonal  toraa  in  profil*  (NDOF) 

KEXO  ;  t  of  raqnirad  •igaavaluaa 

WEC  :  •  of  aubapac*  vactora 

NDOF  :  i  of  d«gr««a  of  fraadom 

TOLEXG  :  tolaranca  for  aiganvaluaa  convarganca 

TOLJAC  :  tolaraaea  for  Jacobi  convarganca 

VV  :  logical  uait  auabar  for  output 

output : 

VLCVDOF.ttVEC)  :  vorking  array 

*  V!.( .  ,1.  .NRMOD)  :  AN  timaa  rigid  modaa 

>  '/L( .  (MIIXOD.  .NVaC)  :  aubapaca  at  tha  pravioua  atop 

VX(NDOF,NV£C)  :  aigan-vactora 

-  VR(. ,1. .NRXOD)  :  rigid  nodaa 

-  VR( NRXOD. .IVEC)  :  aubapaca  at  thia  atap  (aiganvactors) 

AKX(NVEC*(NV£C  *  l)/2)  :  atiffnasa  matrix  in  tha  aubapaca 

ANN(NVEC*(NVEC  ♦  l)/2)  :  conaiatant  maaa  matrix  in  tha  aubapaca 

XXClVECaNVEC}  :  aubapaca  aiganvactora 

EIGy(HYEC)  :  currant  aiganvaluaa 

-  EXGV(1.. NRXOD}  :  0  aigan-valuaa 

-  EXGV(NRNOD..XVEC)  :  follouing  aiganvaluaa  >  0 

EXGOLD(NVEC}  :  aama  aa  EXGV 


XNPLXCXT  REALaS  (A-H.O-Z) 

DXNENSXOI  AX(1) ,AN(l) ,VL(NDOF.NVEC) .VR(NDOF,NVEC) ,AXX(t) , 
1  ANN(l) .XX(NVECaNVEC) ,EXGV(1} ,EXG0LD(1} .XSL(l) .XDXAG(l) 

C 

NRXTB  (X»,i003)  NEXG.NVEC, NDOF, TOLEXG 
C 

CALL  XXVECT  (AK.AX.VL.VR.XDXAG.NDOF.NVEC) 

CAU  FACT  (AX.XDXAG.XSL.XDOF.NV) 

CALL  NULL  (AX,AX.VL,VR,XDXAG,XSL,NDOF,NRNOD) 
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oooo  ooo  oo  ooo  o  oo  oo  ono 


MIIMOD  :  •  of  rigid  aodat 

miTE  (MV,  1004}  NRXOD 
MSUBbWEC-NRXOO 

CALL  ORTEO  (VR.VL.MDOF.MRXOO.WEC) 

MIT«0 
MSMAZbIS 
MrntAz>i6 
MVECl«HVZC-i 
DO  6  I>1,MVEC 
5  EIG0L0(I)«0.0 

00  MIT-MIT+1 

WRITE  (MV. 1000)  MIT 

CALL  SOLVES  (AX.VL(l,MRM0D>l).VR(l.NRM0D>l),IDIAG,ISL,ND0F,NStJ6) 
CALL  ORTHO  (VL,VR,MD0F,HRM00,NVEC) 

IJ«0 

DO  10  J>MRM0D4'1.HVEC 

CALCUUTE  THE  UPPER  PART  OF  AXK  (SYMMETRIC) 

00  10  IsNRMOD^l.J 
TRsO.O 

00  11  Kal.MDOF 

11  TR«TR*VL(K,I)*VR(K,J) 

IJalJ+l 
AKK(IJ)»TR 
10  CONTINUE 

CALL  MULT  (AM,VR(1 ,NRM0D*1) ,VL(1 ,NRM0D*1) ,ISL,IDIAG ,NSUB,ND0F) 
IJ«0 

DO  70  JaNRMOD^l .NVEC 

CALCUUTE  THE  UPPER  PART  OF  AMN  (SYMMETRIC) 

DO  20  I*MRN0D«1,J 
TR»0.0 

DO  21  Kal.MDOF 

21  TRaTR+VL(K,I)aVR(K,J) 

IJaIJ+1 
AMN(IJ}aTR 
20  CONTINUE 

CALL  JACOBI  (AXK,AMN.ZZ,EIGV(MRN004'1},NSMAZ,TOLJAC.NSUB,NV) 
ORDER  EIGENVALUES  A  EIGENVECTORS 
30  ISaO 

DO  40  IaNRM004’l.NVECl 

IF  (EIGV(I4’1}.GE.EIGV(I)}  GO  TO  40 
ISal 

TRaEIOV(I^l) 

EI0V(I+l)aEI0V(I) 
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nno  noo  n  ono 


I 


EIGV(I)»TR 
DO  41  J«1.NSUB 

TR>U(J4(X-IIIIX0D)«ISUB) 

U(XZ-MIUIOD)«VStn)>XZ(J>(l-KRNOD-l)*NSUB} 

41  ZX(XZ-nUIOO>l)*KSOB>Tll 

40  coitudi 

IF  (ZS.EQ.l)  00  TO  30 
SOBSPACI  COWEROEVCE  TEST 
ICOMV-0 

DO  50  Z>nUI0D4^1.MVEC 

TE>DiBS((EZaOLD(I}-EiaV(Z))/EICV(I)} 

EIQOLD(Z}>EI0V(Z) 

EI0V(Z)>TE 

IF  (TB.GT.TOLEIO.AED.I.LE.MEIO)  ICONV-l 
SO  COXTllUE 

WRITE  (MV, 1001)  (EIGV(I}.I>1.KVEC} 

IF  (ICOW.EQ.O)  00  TO  100 

IF  (MIT.LE.WITKAZ)  00  TO  70 
WRITE  (MW. 1002) 

GO  TO  100 

UPDATE  EIGEM  VECTORS 

70  00  80  I«1,ND0F 

00  80  J>1.NSUB 
TR«0.0 

00  81  K«1.MSUB 

81  TR«TR+VR(I ,K*MRM0D)*XX(K*( J-1)*MS0B) 

VL(I,J*HRl!QD)»TR 
80  COHTIMUE 

00  90  I«1.ND0F 

00  90  JsNRMOO'M  ,NVEC 
90  VR(I,J)«VL(I,J) 

GO  TO  500 

CALCUUTE  FIMAI.  EIGENVECTORS 

100  00  110  I>1,MD0F 

00  110  Jal.MSUB 
TRbO.O 

DO  111  K«1.MSUB 

111  TR»TR*VL(I,K*MRM0D)*U(K*(J-1)*HSUB) 

VR(I,J<»MRMOD)«TR 

110  CONTINUE 

DO  112  I>1.NVEC 

112  2IGV(I)-EIG0L0(I) 

RETURN 

» 

1000  FORMAT  (GZ,12HZTERATI0N  NO. 15) 

1001  FORMAT  (6(2Z,1PE10.3)) 

1002  FORMAT  (SZ,24BVE  ACCEPT  CURRENT  VALUES) 

1003  FORMAT  (//20X, 'SUBSPACE  ITERATION  ROUTINE'//'  NB  OF  EIGEMVALUESa ' . 
1  15/'  MB  OF  VECTOR* ',15/'  NB  OF  DOF* ',15/'  TOLERANCE*' ,1PE10. 3/) 

1004  FORMAT  ('  NB  OF  RIGID  MODES*' .16//) 
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cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

SOBROOTUB  imCT  (AX.AM.VL.VR.IOIAa.MSOF.NVEC) 

IMPLICIT  MKAL<*8  (A-H.O-Z) 

DUXMSIOH  AX(1)  .AN(1)  ,VL(p  .TRdIDOr.XVSC}  .IDIAGd) 

c 

m»MDOF/XVEC 

C 

DO  10  lal.XDOF 
II>IOIAO(I) 

VR(I.i)*AM(II) 

TL(I)«AM(II)/AX(II) 

DO  10  J>2.MVEC 
VR(I.J)«0.0 
10  COMTIMUE 
C 

LL«MDOF-MD 

C 

DO  20  J>2.VeEC 
TR»0.0 
C 

DO  30  I>1.LL 

IF  (VL(I).LT.TIl)  CO  TO  30 
TR»VL(I) 

IJ*I 

30  CONTIiraE 

C 

DO  40  IsU.MDOF 

IF  (VLCD.LE.TR)  GO  TO  40 
TR«VL(I) 

IJ«I 

40  CONTnrUE 

C 

VL(IJ)«0.0 

LL>LL-1ID 

VR(IJ,J)«1.0 

C 

20  cokthue 


RETDRH 

EXD 

ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

SUBROOTIME  MOLT  (AM,VR,VL,ISL.II>IAO,NVEC,HD0F) 

IMPLICIT  1EAL«8  (A-H,0-Z) 

DIMEMSIOM  AMCl) .VR(I00F.XVEC} ,VL(XDOF.HVEC} .ISL(1} .IDIAG(l) 


DO  500  IV>1,MVEC 
DO  100  I>1,MD0F 
TR»0.0 
IJalDIAGd) 

IK«ABS(ISL(I)) 

n«i 

DO  110  X«IX,I 

TR»TR+AM(IJ)*VL(KK , IV) 
IJ»IJ-1 
XX>ICX-1 
COMTIMnE 

ft 

IF  (I.EQ.MDOF)  GO  TO  99 
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nno  ooo  or>o  ooo 


ZK>I*1 

DO  120  K>ix.ioor 

zr  (Z.LT.ABS(ZSL(X)))  00  TO  120 

U>Z0ZA0(X)-X-»Z 

1T«TE«iJI(ZJ}*VL(X.ZV) 

120  COITZIOX 

99  Vll(Z.ZT)«Tll 

100  comrziiDB 

600  COXTZIIDS 

XXTORX 

EltD 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

SUBROOTZIB  JACOBZ  (AX.iN,ZX.BZ0V.XSlUX,T0L,X,lIV) 

ZXPLZCZT  IUUL*8  (i-H.O-Z) 

DZXnSZOH  AX(1).AX(1),U(X,I).EZ0V(1) 

ZVZTZALZZE 


ZERQaO.O 
TV0>2.0 
DO  10  Z«1.V 

ZZ«Z*(Z-1)/2*Z 

ZF  UXCZZ). LE. ZERO. OR. AM(ZZ}.LE. ZERO)  GO  TO  900 
EZaV(Z)>iX(IZ)/iX(ZZ) 

DO  20  Jal.X 
XZ(Z.J)>ZER0 

20  corrzKUE 

ZZ(Z,Z}«1.0 
10  CORTZEUE 

SET  COUTTER 

RSVEEPaO 

NR«K-1 

>00  HSVEEP>RSVEEP>1 

CHECK  zr  ZEROOZRQ  ZS  REQUIRED 

EPS«O.Oi**RSVEEP 
EPS>EPS«EPS 
DO  ISO  Jal.RR 
ZZX«J+i 

DO  160  XaZZX.R 
JJ»J*(J-1)/2*J 
XX«X*(X-l)/2tK 
JX»X*(K-1)/2*J 

EPSAX>(AX(JX)«AX(JX})/(AX(JJ}<*AX(XX}} 
EPSAK>(AX(JX}*AR(JK}}/(AK(JJ)«AH(XX)} 
zr  (BPSAX.LT.EPS.AXD.EPSiH.LT.EPS}  GO  TO  ISO 

CALCUUTE  ROTATZOR  ELEMENTS 

iXXaiX(XX)*AX(JX)-AX(KX)«AK(JX) 

iJjBAX(JJ)*AX(JX)>AN(JJ)>*AX(JX) 

AB«(AX(JJ)*U((XX}>AK(KX}*iX(JJ})/TVO 

CaECX>AB«AB>m*AJJ 

zr  (CHECX.lt. ZERO)  GO  TO  900 

sqeB«osqRT(cEECx) 
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non 


Dl-iB<»SqCH 

D2«A0-SqCH 

DIMaOi 

zr  (DaS(D3).aT.DUS(Dl))  DEir>D2 
zr  (SEM.n.zno)  oo  to  48 

CASZIUI 

eO«-AK(JX}/AX(KX) 

00  TO  60 

46  CA>AXX/DEX 

COa*>AJJ/DXM 

pnurau  oonauLzzEO  rotatzoh 

60 

XP1*«K«1 

XX1>K>1 

ZF  (JXl.LT.l)  00  TO  70 
DO  60  Z>1.JR1 
IJ>J*JN1/2«I 
ZK>K«KN1/2«I 
AKJ>AX(ZJ} 

AXX«AX(ZK) 

ANJ«AK(ZJ) 

AIUC«AM(IX)* 

AX(ZJ)«AXJ4CG*AKX 

AX(ZJ}«AMJ«C6<*AKX 

iX(ZX)«AXX«CA«AXJ 

AX(ZX)>AJnC'l-CA«AXJ 

60  COXTIHOE 

70  IF  (XPl.GT.I)  GO  TO  90 

DO  80  Z>XP1,I 
JI*I*(Z-!1)/2*J 
XI«il*(Z-l)/2*X 
UJaAXCJI) 

AXJ>AX(JI} 

AXX«AX(XI) 

AXX>A1I(XI) 

AX(JI)aAXJ-»CG«AXX 

AII(JI)>AKJKG*AKX 

AX(XZ}«AXX«CA«AXJ 

AlI(XI)>Aia(«CA«iU{J 

80  coirrzxoE 

90  IF  (JPl.GT.XXl)  60  TO  iiO 

DO  100  I>JP1.XX1 
JI»I»(I-l)/2+J 
IX«X*(X-l)/2+I 
AXJ»AX(JI) 

ANJ>AH(JI} 

AXX«AX(IX) 

Aia(>AR(IX) 

AX(JI)>AXJ«CG«AXX 

AM(JI)«AXJ>C0>»A1IX 

AX(1X}>AXX4'CA*AXJ 

AX(ZX)»AXX«CA«AXJ 

100  covnxoE 

110  AXX«AX(XX) 

AIOOAXCXX) 

AXJ«AK(JJ) 
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nno  onn  ooo  noo 


AXJ«AM(JJ) 

AK(KX}*AXK^TW0«CA*AX(JX)4CA*CA*AXJ 

All(XX}«AiaC‘»TVO*CA*AM(JK}-»CA*CA*AXJ 

AX(jj)>AXJ«T«o*ca*u(Jx)*ca«ca*AXX 

AX(jj)«AXJtTtra«co*AX(Jx}4ca«ca*A]ix 

AX(JX)«ZX1U) 

AX(JX}«XEI10 

OPDATI  XZOXXVXCTOX  POX  THIS  XOTATZOM 

DO  120  Z«1.X 
U>ZZ(Z.J) 

XZX>U(Z,X) 

U(Z.J)«U>C0*UX 

ZZ(1,X}>ZXX«CA«UJ 

COXTIirUE 

CONTZHOE 


UPDATE  EZQEXVALOES  A  CHECK  COHVEXGEHCE 

XTaX«(X«l}/2 
ICOXVaO 
DO  160  Z«1,X 
IZ«Z*(Z-1)/2*1 

IF  (AX(ZZ).LX.ZERO.QX.AK(n).LE.Z£RO)  00  TO  900 
TX«a(ZZ)/AM(ZZ) 

DE1I«<TR-EIGV(I))/TX 
EZGV(Z)»TR 

ZF  (DABS(DEX).GT.TOL)  ZC0NV«1 
160  COXTZXUE 

IF  (ZCOXV.Eq.l)  GO  TO  499 

CHECK  OFF  DIAGOHAL  TEXXS 


EPS>TOL«TOL 
DO  170  J«1,XX 
IZX>J«1 

DO  170  X«IIX.X 
JJ«J*(J-1)/2>J 
KX>K<*(K-1)/2>K 
JX»X*(K-l)/2+J 

EPSAX«(AX(JX)*AX(JK)}/(AK(JJ}«AX(KX}) 

EPSAM«(AM(JX)«AN(JX}}/(AM(JJ)«iK(XK}) 

ZF  (EPSAX.LT.EPS.AXD.EPSA11.LT.EPS)  GO  TO  170 
GO  TO  499 
170  COHTHtUE 


SCALE  EZGEXVECTORS 


179  DO  180  Z>l,l 

zz«z*(z-i)/a*i 

AXX«DSqBT(AM(IZ)) 

DO  180  Jal.M 

U(J,I)>U(J.Z)/AXX 

180  COXTZXUE 
C 

RETUBX 

C 

499  ZF  (XSXEEP.LE.XSXAZ)  GO  TO  600 


99 


non  o  o  o 


VRZTS  (MW.tOOO) 

QO  TO  179 
C 

900  VRZTI  (W.lOOl) 

STOP 

C 

1000  FOUUT  (SZ,34B10  COimOBirCS  AT  ISHAZ  ITZIUTIOHS) 

1001  FOBMAT  (SZ.MBDUIOI  XB  JACOBI  :  NATRZZ  XOT  POSITIVE  DEFINITE) 
C 

ns 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

SOBXOOTm  SOLVES  (AK.VL.VB.IOIAO.ISL.IDOF.NVEC) 

C 

C  PURPOSE  :  SOLVES  THE  SIMOOLAR  PROBLEM  :  AK  x  VL  •  VR 
C  THE  SnOULAR  COLUMNS  INTO  AX  ARE  INDEXED  BY 

C  THE  NEGATIVE  VALUES  OF  ISL.  THE  CORRESPONDING 

C  TERMS  OF  THE  SOLUTION  ARE  PUT  TO  0 

C 
C 

IMPLICIT  REAL*8  (A<R.O-Z) 

DIMENSION  AX(1),VL(NDOF.NVEC},VR(NDOF.NVEC).IDIAG(1),ISL(1) 

C 

DO  600  IV>1,NVEC 

DO  60  I«1.ND0F 
60  VL(I.IV)»VR(I,IV) 

C 

C  BACXSUBSTITUTE 

C 

DO  100  IC«2.ND0F 
TR«0.0 
IC1«IC-1 
IN1>XDIAG(IC)*IC 
.;X>ISL(IC) 

IF  (IX.LE.O)  THEN 
VL(1C,IV)»0. 

GOTO  100 
ENDIF 

IF  (IX.OT.ICl)  GO  TO  100 
DO  130  K«IX.IC1 

TR»TR+AK(lNltK)*VL(K,IV) 

120  CONTINUE 

VL(IC,IV)«VL(IC,IV)-TR 
100  CONTINUE 

SOLVE  DU>U 

DO  160  IC>1,XD0F 

VL(IC , IV)«VL( IC , 1V}/AX( IDIAG( IC) ) 

160  CONTINUZ 

BAXSUBSTITUTE 

IZC>XDOF 

DO  300  IC«3.XD0F 
TR*VL(I1C,IV) 

ICl-IIC-1 
IX«ISL(IIC) 

IN1>I0IA6(IIC}-IIC 


100 


n  o  o  o  o  o 


ir  ((ZK.QT.XCD.OK.CZK.U.O))  GO  TO  221 
DO  220  K>ZX,ZC1 

VL<I ,  ZV)»VL(K ,  ZV)-A1C<ZH14K)*TR 

220  CORZXnE 

221  ZZC>ZZC-1 
200  COMTZIDX 
BOO  COITZHUZ 

BITDBI 

EXD 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

SOBBOOTZXX  FACT  (AX.ZOZAO.ZSL.JtDOF.XV) 

C 

C  PDRPOSB  :  LOLT  DECONPOSnZOX  OF  THE  POSZTZVE  SEXZ-DEFZNZTE 
C  XATEZE  AX,  TEE  SZXOULAE  COLUMNS  OF  AX  AXE  ZMDEXEO 

C  XT  A  NEOATZVE  VALUE  OF  ZDZAa> 

C 

C 

ZHPLZCZT  IIEAL«8  (A-H.O-Z) 

DZMENSZOX  AX(1).ZDZAG(1).ZSL(1) 

C 

C  DETEKXZXE  HZX  A  MAX 
C 

TR>DABS(AX(1)) 

ANZNoTE 

ANAX>TK 

DO  10  ZL>1,XD0F 

TR>OABS(AX(ZOZAG(ZL))) 

ZF  (TE.LT.AXZN)  AXZB«TR 
ZF  (TM.OT.AMAX)  AXAX>TR 
10  COMTZNUE 

ZEB0«(AXAX>ANZX}«1 .00>10 

LOOP  OVER  COLUMN 

DO  100  ZC>1.ND0F 
NZC*ZSL(ZC} 

ZC1»ZC-1 
NZC1«MZC«1 
ZN2>ZDZAG(ZC}-ZC 

ZF  ((NZC.LT.1}.0E.(NZC.GT.ZC)}  GO  TO  901 
CALCUUTE  GS 

ZF  (XZCl.GT.ZCl)  GO  TO  150 
DO  120  ZL>NZC1,ZC1 

ZF  (ZDZAG(ZL).LT.O}  THEN 
AXCZNB^ZDsO 
GOTO  120 
ENDZF 

MZL>ZSL(ZL} 

ZL1«ZL-1 

HZM«MAXO(MZL,XZC} 

ZN1«ZDZAG(ZL)-ZL 
TEbO.O 

ZF  (NZM.GT.ZLl)  GO  TO  120 
DO  130  X>NZN.ZL1 

TE«TR4>AX(  ZNl^X)  «AX(  ZN2«K) 

130  COITZXUE 


101 


o  o  n 


DfaZn^IL 

AX(1I}>AX(ZX)-TII 

120  coirrxiiuB 

c 

C  CALCnUTE  UO 

e 

150  TE«0.0 

IF  (XZC.OT.ZCl)  00  TO  201 
DO  200  XL«MZC,ZC1 

IF  (lOZAOdD.LT.O)  OOTO  200 
A0>iX(IX2«IL) 

AL»AO/AX(IDIAa(IL)) 

AX(ZX2^ZL)«AL 

T&>TIl>AL<»iO 

200  coxTixnx 

201  ZX>IDZAQ(IC) 

AX(IX)>AX(IX)-TR 

IF  (AXdD.LT.ZERO)  IUIAOdC)>-IDIAGdC) 

100  CONTIMUZ 
RETUIUt 

90?  TIITE  (HW.lOOl) 

STOP 

1001  FORMAT  (5Z,29H>*«<*ST0P  ERROR  IM  IDIAQ  VECTOR) 

1010  FORMAT  (5Z,*C0KDITI0XIMG  OF  THE  STIFFNESS  MiTRIX'/2Z, 

1  'MIX  OIAG  TERX«',1PE10.3.’  MAZ  DUG  TERM»* .E10.3) 

END 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

SUBROUTINE  NULL  (AX.AM.VL.VR.IDIAG.ISL.NDOF.NRMOD) 

PURPOSE  :  CALCUUTE  THE  NULL  SPACE  OF  AX  AND  PUT  AN 

OllTHONORMALISED  BASE  OF  THIS  SPACE  INTO  THE 
C  XAXOD  FIRST  VECTORS  OF  VR. 

C  VL  «  AM  X  VR  AFTER  EXECUTION 

C 

C 

IMPLICIT  REAL«8  (A-E,0-Z) 

DIMENSION  AX(1),AM(1),IDIAG(1),ISL(1).VL(ND0F,*),VR(ND0F.*) 

C 

C  STORE  THE  SINGULAR  COLUMNS  INTO  THE  BEGINNING  OF  VR 
C 

C  THE  SINGULAR  EQUATION  ARE  NOW  INDEXED  BY  NEGATIVE  VALUES 
C  INTO  ISL  INSTEAD  OF  IDIAG 
C 

NRX0D>0 

DO  1  IC>1,ND0F 

IF  dOIAadC}.GT.O)  GOTO  1 
IDZAGClO-'IDIAGdC) 

XRMQO'XRMOD^l 

XIC«ISLdC) 

IN>IDUGdC)>IC 
DO  2  X»1,XIC*1 

2  VR(X.NRN0D}>0. 

DO  3  X*XIC,IC'l 

VR(X,NRXOD)«AXdN«X) 

AXdN«K)>0. 

3  CONTINUE 


102 


XSL(XC)«-ZSL(1C} 

VR(XC,IU!OD)<i-l. 

AK(X0XA0(XC}}>1. 

DO  4  X-XC^l.llDOF 
4  vii(K,nuioo)>o. 

1  COXTXlOB 
C 

C  BAXSUBSTXTUTE 
C 

DO  200  X»l.jnUIOD 
XXC-XDOF 

DO  200  XC>2,IID0F 
TIl>VIl(XXC,l) 

IC1»XXC-1 

IX>XSL(XXC) 

X>l«XOXiO(XXC)-IIC 

XF  ((XX.OT.XCl).OR.(IX.LE.O})  CJ  TO  221 
DO  220  X>XX,XC1 

VR(X.K)«VR(X.N)-AX(IH14K)*TR 

220  COITXXOE 

221  XXC«IXC-1 
200  CONTINUE 

C 

C  ORTHOGONALISATION 
C 

DO  10  N>1.NRX0D 
DO  20  K«1,N-1 
TR»0. 

DO  30  I'l.NDOF 

30  TR«TR*VL(I,K)*VR(I,N) 

DO  40  I«1,N00F 

40  VR(I.N)«VR(I,N)-TR*VR(I,X) 

20  CONTINUE 

CALL  NULT( AH , VL( 1 ,N) , VR( 1 .N) , ISL, IDIAG , 1 ,ND0F) 

TR«0. 

DO  60  I>1,ND0F 

SO  TR»TR*VR(I,N)*VL(I,N) 

TR«l/SqRT(TR) 

DO  60  I>1,ND0F 

VR(X,N)»VR(I,N)*TR 
VL(I,N)»VL(I,N)*TR 
60  CONTINUE 

10  CONTINUE 

RETURN 

END 

CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC 
SUBROUTINE  ORTHO(VL,VR,NOOF,NRXOD.NVEC} 

C 

C  PURPOSE  :  0RTH060NALISE  TEE  NSUB  UST  COLUHNS  OF  VL  (LAST 
C  EVALUATED  SOLUTION)  WITH  RESPECT  TO  THE  NULL  SPACE 

C  OF  A,  FOR  THE  AX  SCALAR  PRODUCT 

C 
C 

IMPLICIT  REAL*8  (A-H,0-Z) 

INTEGER  NDOF.NRMOD.NVEC 

DIMENSION  VL(XDOF,NVEC},VR(NDOF,NVEC) 

NSUB>NVEC-NRMOO 
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DO  1  Jal.MSOB 
DO  2  lal.ntXOO 
S>0. 

DO  3  X«1.1D0F 

3  SaS*VL(X,I)«VI.(K,inU(OD'»J) 

DO  4  L*l,XDOr 

4  VL(L.ltXX0D-»J}>VL(L,nUI004’J}>S*VR(L.I) 

2  COXTIXDE 

1  COXTHDii 

RETDRX 

EXD 

ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


File:  animout.f 


C>Ho<lttl«  ANIMOOT 
C«Attt2ior  X.  ilvia 
CaOat*  Jua«  1990 
CaBlock  Fortran 

C  - - - - - - - 

c 

C  ■ubrontino  AHIKOOT 

C 

C  Purpono:, 

C  This  •nbrontiao  prodneo*  u  output  filo  to  b«  usod  to 

C  vlsunlizo  tho  aiaulntion  using  MESH. 

C 

C  - 

c 

tubrov^ins  iNIMOUT(q,id,nnp,tiBS,out) 
rsnl>*8  q(l),tias,T(3) 
iatsgor  out,id(6,l},nnp,i,k 
*rito(ont,'(glS.6}')  tias 
do  100  i>l,nap 
do  200  k>1.3 

if  (id(k|i)  .no.  0)  thsn 
T(k)  »  q(id(k,i}) 
slss 

»(k)  ■  0. 
sndii 

200  eoatiaus 

«rits(ont,1000)  (T(k),ksl,3) 

100  eontinno 
1000  forant(3gl5.6) 
rstum 
•ad 


File:  stiffrc.f 


C  snbroutia*  STIFFRC(v,Xnct,kq) 
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raewtiv*  •nbrontin*  STXFFllC(v,l&ct,kq) 
r«al*8  v(l},fact,kq(l) 
iaelttd*  *ahur*d.iae' 

C  ASSEMBU  EACH  ELEXEHT  NASS  AND  STIFFNESS 

do  100  iiol,&doBaia 

CVDI  CNCALL 

do  110  jjal.BOlddi) 
a  ■  olaaaCjjtil) 
call  ELEFRC(v,fact,kq.a) 

110  eoatlaao 

100  eoatlaao 

rotara 

oad 

C  oabroatiao  ELEFRC(T,faet,kq,B) 

rocaraivo  aabroatiao  EL£FEC(v,2act,kq.a) 

roaloS  r(l),faet,kq(l) 
iatogor  a 

iaclado  ’aharod.iae' 

C  LOCAL  VARIABLES 

paraaiotor(NAXSEq*24} 
roaloS  ak(NAXSEq,NAXSEq) 
iatogor  laCKAXSEq) .aaoq 

do  20  k>l,4 
jaia(k,a} 

if  (Cot7po(a}.oq.l}.aad.(k.gt.2))  j  ■  0 
do  30  iol,6 
kk»6*(k-l)  ♦  i 
if  (j  .ao.  0}  thoB 
la(kk}  •  idd.j) 
olao 

laCkk)  >  0 
oadif 

30  eoatlaao 

20  eoatlaao 

aaoqoiS 

call  L0A0SK(ak,a,aaoq}  - 

call  ESTIFVM(ak.lB,aaoq,v,kq,laet) 

rotara 

oad 


C  ittbrontin*  LOAOSX(tktn,nt«q) 

rcevxslT*  subroutin*  LOADSX(ak,a,ai«q) 

iaelad*  *shar«d.lac' 

r«al*8  skCaaaq,!) 
iatagcr  atasaq 

k«0 

do  10  jal.aaoq 
do  20  i«l.j 
k-k^l 

>k( 1 , j )a«atila(k , a) 
ak(j,i)«ak(i.j) 

20  eoatiaaa 

10  eoatiaaa 

ratura 

tad 


File:  estifvm.f 


C  aabroutiaa  ESTlFVM(ak,lB,aaaq,v,kqtfact) 

raearaiva  aabroutiaa  ESTIFVM(ak,lm,aaaq,v,kq,iact) 
C  ARGUNEHTS 

raal«8  ak(aaaq,l} ,v(l) ,kq(l) ,fact 
iatagar  la(l},aaaq 

do  20  j  a  1,  aaaq 
k  a  l«(j) 

ii  (k  .aq.  0}  goto  20 
do  10  i  a  1,  aaaq 
■  a  lad) 

it  (■  .aq.  0}  goto  10 
kq(a}  a  kq(a}  *  ak(i, j)*Y(k}afact 
10  eoatiaaa 

20  eoatiaaa 

ratora 

aad 

CaEad  Fortraa 


File:  renua.f 


CaDECX  REIUN 

CapURPOSE-  EEVOMBEES  THE  GRID  POIXTS  TO  XIHIHZZE  PROFILE  STORAGE 
CaAOTHOE  V  X  BELVn  aad  OOC  XGOYEX  7-5-90 
C 

anbroatiaa  REIUX 
C 

iaeloda  *akarad.iae* 


non 


laltializ*  vector 
MXtry«aettBp/3  'fl 


atonu*iuip*Maxtr7 
do  32  jal.atoxas 
22  Iadjc7(j)a0 

do  10  ial,aap 
10  ieosat(i)«0 


do  1  ial.aol 
aodoaalxCl.i) 
aodobalz(2ti) 

if  ((aodoa  .oq.  0).or.(aod«b  .oq.  0))  go  to  1 
icooat (aodoa) aieooat (aodoa) el 
ieoaat (aodob)aieoaat (aodob) e 1 
'  iaaieonat(aodoa) 
ibaieooat (aodob) 

ifCia.gt.aaztry  .or.  ib.gt.aaztry)  go  to  345 
locat 0* (aodoa-1 ) aBaxtryelA 
iadjc7(loeat«}aaodob 
locat^a(nodob-l)aaaxtr7eib 
iadjc7(locat«)aaodoa 
1  eoatiaao 
caaaaaaaaaaaaaaaaaaaaaaa 
iiaO 

do  37  ial,ntonu 

if  (  iadje7(i}  .aq.  0  }  go  to  37 
iiaiiel 

iadjc7(ii)«iadjc7(i) 

37  eoatiaao 
c***m***mmmmmm*m*mm*’* 
laotaO 

do  2  i«l,nap 

laotalaateieoaat(i) 

2  eoatiaao 

jjaicoaat(l) 
icoaat(l)ai 
do  3  ia2,aapei 
kkaieouatCi) 
ieoaat(i)aieoaat(i*l)ejj 
jjakk 

3  eoatiaao 
go  to  566 
345  ■rito(6,566} 

555  foraat(2z,' error  ia  diaoaeioa  for  NAX7RY  II  *) 

656  eoatiaao 
eaaaaaaaaaaaooaaaaaoaoao 

call  QEIRCII(aap ,  ieooat ,  iad j  cj ,  pora,aaok , xls } 

rotora 

oad 

cimtxxmtmvim 

'  sabroatiao  goareaCaoqao .xadj  iadjae7tponi,Baok,zlt) 


e . roforoaeo:  co^patar  oolatioa  of  largo  aparoo  poaitivo  dofinita 

e .  apatoaa,  alaa  goorgo  k  joaopk  «-k  lia 

e .  (proativo>kall,iae.,oaglavood  eliffa,IfJ  07632) 

iatogar  adjaepd)  .auuikd)  ,parad)  ,zlad) 
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iat«g«r  sadj (1) ,ee«is«|i .aaqaa .alvl.aaa.root 
do  too  iol.aoqaa 
aaak(i)>l 
too  eoatiaaa 
aaaot 

do  200  i«i,aoqaa 

if(  aaak(i}.oq.O  )  go  to  200 
root*! 

eall  faroot(root,aadJ,adjae7taaaktalvl,zla,porm(nnB}  ) 
call  rea(root,zadj ,adjaey,a«aktp«ni(aaai) ,ccaizo,xla} 
aawaaas^eeaizo 
ifCaaa.gt.aoqaa)  go  to  987 


200  eoatiaao 

c . poraCaaa  aodo)Bold  aoda 

e . ao«,  anakCold  aoda}>  aav  aoda 

987  eoatiaao 

do  11  aoool.aoqaa 
ioldoponi(aow) 
aask(iold)Baoo 

e  «rito(8,o)  'iold,BMak(lold}  «  * ,iold,aaak(iold) 

11  eoatiaao 

rotara 
oad 


exmmxmxxxmxmxxxxxxxxxxxmxmxxmmmxxxx 

aabroat iao  laroot  (root .  zmd j ,  ad j  aey  ,auiak ,  nl vl ,  zla ,  la ) 
iatogor  adjaey(l) tla(l) .aaakCl) «zla(l) 
iatogor  xadj(l},eeaizo,j ,jatrt,k.katoptkatar6, 

I  adadog , aabor » adog , alvl , aodo , aaalvl , root 

eall  reetla(roet,zadj ,adjaey,aaak,alvl,zla,l8) 
eea isoaxla Calvin 1 } >1 

ifCalvl.oq.l  .or.  alvl.oq.eeaizo}  rotara 
100  jatrtazla(alvl) 
aiadogoeeaixo 
root>l8(j8trt) 

iiCeeaizo.oq. jatrt)  go  to  400 
do  300  jajatrt.eeaizo 
aodoalaCj) 
adogaO 

katrtazad j (aodo) 
katopazad  j  (aodo-^  1 }  - 1 
do  200  kakatrt.katop 
aabor«adjaey(k) 

ii(  aaakCaabor)  .gt.  0)  adogandog'*’! 

200  eoatiaao 

ifCadog.go.adadog)  go  to  300 
rootaaodo 
■iadogaadog 
300  eoatiaao 

400  eall  rootla(root,zadj,adjaey,aaak,aaalvl,zl8,l8} 
if(aaalTl.lo.alvl)  rotara 
alvlaaaalTl 

it(alvl.lt.ceaizo)  go  to  100 

rotara 

oad 

eXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

aabroatiao  reaCroot.zadj ,adjaey,auMk,pora,co8izo,dog) 
iatogor  adjaeyCl)  ,dog(l)  .aaakd)  ,pora(l) 
iatogor  xad j ( 1 } , eeaizo , labr  > i f j  t  j  ^top , j  atrt ,k , 1 , Ibogia , 
$  labr,lp«r*>lrl*Bd,abr,aodo,root 
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e«ll  d«gr««(reot,xadj  ,adjiic7,aa«k,d*g,ec>ixa,parm) 

■uk(roet)aO 

ifCeesisa.la.l)  ratura 

IvlaadaO 

labr«i 

100  IbagiavlTlaad^l 
Ivlaadalabr 
do  600  ialbagiii,lTlaad 
aoda«paxB(i) 
jttrtaxaidj(aoda) 
j  atopazad j (aoda« 1 )• 1 
fabralabr^l 
do  200  jajttrtijstop 
abraodjaey(j) 

if(aaak(Bbr).aq.O)  go  to  200 

labr«labral 

Bask(abr}a0 

pan(labr)aabr 

200  coatiaaa 

if (Izbr.ga.labr)  go  to  600 
kafabr 

300  l>k 

k«k41 

abrapan(k) 

400  if (l.lt.fnbr)  go  to  600 

Ipozmapata(l) 

if(  dag(lpani),la.dag(nbr)  )  go  to  600 
pan(lal)>lpani 
1»1-1 
go  to  400 

500  paza(l«l)>abr 

if(k.lt.labr)  go  to  300 

600  coatiaaa 

if (labr.gt.lTlaad)  go  to  100 
kaecslxa/2 
laccsiza 
do  700  ial.k 
IparaaparaCl) 

'  paz«(l)aparB(i} 
para(i)alpaza 
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Abstract 

A  computationally  oriented  formulation  and  its  solution  procedures  for  the  analysis  of 
rigid-flexible  multibody  dynamics  systems  are  presented.  The  present  formulation  adopts  a  set 
of  dual  coordinate  systems,  inertially  fixed  one  for  the  measure  of  translational  motions  and 
body-based  one  for  rotational  motions.  The  origins  of  these  coordinate  systems  are  located 
at  the  centers  of  rigid  bodies  and  at  the  nodal  points  of  flexible  bodies  for  implementation 
ease.  The  flexibility  is  modeled  by  an  intrinsic  spatial  beam  theory  which  is  approximated 
by  transverse-shear  deformable  linear  beam  elements.  The  solution  of  the  resulting  equations 
of  motion  including  system  constraints  is  obtained  by  a  partitioned  procedure,  which  solves 
first  for  the  constraint  force  vector,  then  the  generalized  coordinates  for  the  rigid  and  flexible 
components,  and  finally  interaction  quantities  such  as  active  control  forces,  maneuvering  space 
ranges,  and  corrections  due  to  state  measurements,  with  each  solution  stage  being  processed 
by  the  corresponding  separate  module.  A  central  feature  of  the  present  capability  is  its  high- 
accuracy  of  the  analysis  results  by  demanding  the  energy  conservation  throughout  the  various 
stages  of  response  analyses.  Several  examples  are  included  to  demonstrate  the  capabilities  of 
the  present  analysis  software  both  on  sequential  and  parallel  machines. 
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1.  Introduction 


The  multibody  systems  analysis  capabiHty  that  we  present  herein  has  been  motivated 
by  three  emerging  needs:  real*time  simulation,  interfacialbility  with  other  disciplines  such 
as  active  control  and  work-space  path  planning,  and  high  acctiracy  in  analysis  resxilts.  The 
need  for  real-time  or  on-line  analysis  capability  stems  from  space  structural  operations, 
deep-sea  systems  and  remotely  ccntroUed  moving  of  hazardous  materials.  The  decision  to 
interface  multibody  dynamics  analysis  systems  with  active  control  strategies  rather  than 
to  integrate  these  two  computational  elements  into  one  has  been  motivated  to  preserve 
software  modularity  and  provide  a  relatively  pain-minimizing  environment  for  future  ex¬ 
pansions  and  modifications  of  the  present  capabilities.  Finally,  the  requirement  for  highly 
accxirate  analysis  resvdts  is  for  the  present  analysis  package  to  be  used  in  space  construc¬ 
tion  as  well  as  high-precision  assembly  simulation  of  mechanical  and  electronic  msudiinery. 
Of  course,  the  present  package  is  also  applicable  to  automobile  and  other  transportation 
systems  dynamics  simulations  as  well  wherein  the  accviracy  requirement  is  not  as  stringent 
as  in  aerospace  and  electronic  assembly  simulations. 

The  present  multibody  simulation  package  consists  of  five  modules:  an  input/output 
processor,  the  rigid-body  elements  that  include  joints  and  constraints,  the  spatial  beam 
modeler,  the  partitioned  solver,  and  the  interface  provisions.  Of  the  five  elements,  in  this 
paper  we  will  restrict  ourselves  to  describe  the  three  kernels,  viz.,  the  rigid-body  elements, 
the  beam  modeler,  and  the  solver.  To  this  end  the  paper  is» organized  as  follows.  Section  2 
presents  the  kinematic  description  of  rigid-body  elements  including  joint  constraints.  For 
physical  as  well  as  implementational  considerations,  the  origin  of  the  coordinate  systems  for 
each  body  is  located  at  the  center  of  mass.  This  is  in  contrast  to  many  existing  kinematic 
descriptions  of  kinematics  that  choose  the  joint  hinges  as  the  origins  of  the  coordinate 
systems.  Specifically,  the  translational  motions  are  referred  to  an  inertial  frame  whereas 
the  rotationjJ  orientations  are  based  on  a  body-fixed  frzune  for  each  body.  This  dusd- 
coordinate  choice  yields  a  constant  inertia  matrix,  which  makes  the  explicit  time-marching 
solution  efficient. 

The  modeling  of  flexible  beams  is  detailed  in  Section  3.  The  present  beam  model  em¬ 
ploys  a  fully  nonlinear  theory  which  accounts  for  both  finite  rotations  and  moderately  large 
deformations.  Within  the  context  of  classical  rod  theory,  the  present  formulation  employs 
a  convected  coordinate  representation  of  physical  Cauchy  stresses  and  corresponding  set  of 
physical  strains.  As  a  consequence,  the  beam  model  can  easily  be  interfaced  with  on-line 
strain  measurements  emd  feedbeudc  control  systems  as  sensors  measure  only  physical  quan¬ 
tities.  Another  advantage  of  the  formffiation  is  that  the  degrees  of  freedom  of  the  beam  ■ 
component  embody  both  the  rigid  and  flexible  deformation  motions.  A  distinct  feature 
of  the  present  work  is  the  computational  preservation  of  total  energy  for  undamped  sys¬ 
tems;  this  is  obtained  via  an  objective  streiin  increment/stress  update  procedure  combined 
with  an  energy-conserving  time  integration  algorithm  which  contains  an  accurate  update 
of  angular  orientations. 
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The  solution  module  for  the  present  multibody  analysis  capability  consists  of  three 
sub>constructs:  the  solver  for  the  translational  degrees  of  freedom,  the  integrator  for  the 
angular  orientations,  and  the  stabilized  solution  of  Lagrange  multipliers  for  the  system 
constraints.  An  active  control  svstem  can  be  interfaced  with  the  present  capability  by 
treating  the  active  control  forces  as  externally  applied  distiirbances  and  by  providing  the 
necessary  state  vectors  that  the  active  control  systems  synthesizer  must  have.  A  tinique 
featme  of  the  present  simulation  procedure  is  that  the  Lagrange  multipliers  are  obtained 
from  a  set  of  stabilized  time-differential  equations. 


2.  Equations  of  Motion  for  Constrained  Multibody  Systems 


D’Alembert’s  equations  of  motion  cast  in  the  form  of  the  principle  of  virtual  work  for 
a  constrained  multibody  system  can  be  stated  as  [1] 


Sui  pui  dV  + 


Suifi  dV  - 


Suiti  dS  0 

lrs=l 


=  0,  k  =  l...Tn. 


(2.1) 

In  the  above  equation,  the  cartesian  coordinates  x,-  represent  the  particle  position  adter 
some  deformation  has  taken  place,  Sui  a  kinematically  admissible  virtual  displacement, 
Ui  the  absolute  acceleration,  /,-  the  external  force  per  unit  mass,  and  t,-  the  stress  vector 
acting  on  a  surface  with  outward  normal  components  n,-.  Likewise,  afj  represents  the 
cartesian  components  of  the  Cauchy  stress  tensor,  and  p  is  the  mass  density.  Finally,  Xk 
is  the  Lagrange  multiplier  that  enforces  the  k-th  system  constraint  equation,  ^k  =  0,  and 
m  is  the  total  number  of  the  constraint  conditions.  We  will  now  present  term  by  term 
formulation  or  discretization  procedures  to  obtedn  the  discrete  equations  of  motion. 


2.1  Inertia  Operators  for  Rigid  Bodies 

The  inertia  force  operator  is  the  first  term  in  (2.1) 

6F^  ^  f  p  SuiUi  dV  ^  f  pSu-ndV  (2.2) 

Jv  Jv 

For  the  case  of  rigid  bodies,  the  position  vector  r  can  be  expressed  as  (see  Fig.  1  for  the 
description  of  the  present  kinematics  adopted): 

Up  =  vTe  +  <s^b  ,  b  =  R  e  (2.3) 

where  “boldface”  symbols  represent  thi’ee  subscripted  vectors  and  the  normal  type  symbols 
represent  three  components  of  a  given  vector;  e  =  {  61,02,03  represents  the  three 
orthogonal  vectors  defining  the  inertial  reference  frame;  b  =  {  bi,b2,bs  represents 
the  body-fixed  reference  frame  which  is  attached  to  and  rotates  with  the  rigid  body  and 
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which  is  related  to  e  by  the  (3  x  3)  matrix  R;  u  as  {  ui,U3,U3  represents  the  inertial 
components  of  the  original  neutral  axis  petition;  and  s  as  {  si, 33,33  represents  the 
distance  of  a  particle  pdV  horn  the  center  of  mass  measured  in  the  body-fixed  coordinate 
system. 


The  velocity  and  acceleration  and  virtual  displacement  vectors  of  point  p  can  thus  be 
derived  firom  (2.3)  as 


u,  =  tt^e  +  3^w^b 

(2.4) 

=  u^e  +  3^w^b  -h  3^u>^(D^b 

(2.5) 

=  Su^e  +  3^^a^b 

(2.6) 

where  the  skew-symmetric  angular  velocity  tensor  Q  and  the  virtual  rotational  tensor  Sa 
are  defined  by 


Q  =  RR  = 


Sa  as 


■  0 

-0)3 

U3i 

W3 

0 

-CJi 

(2.7) 

— (*>2 

u;i 

0  . 

-5RR 

r 

) 

(2.8) 

respectively.  By  substituting  (2.5)  and  (2.6)  into  the  inertia  force  operator  (2.2),  one 
obtains 


SF^  =  5u^M(ti-f  R^3fc:;-l-R^w3fa;)-^5a^M3fRu-h  Jw+wJw  (2.9) 


where 

M=  f  pdV,  J  =  /  psS'^dV,  M3c=  /  psdV  .  (2.10) 

Jv  Jv  JV 

A  considerable  simplification  can  be  made  in  the  inertia  force  operator  if  the  origin  of  the 
body-fixed  reference  frame  coincides  with  the  center  of  mass  of  the  body  and  the  axes 
coincide  with  the  principal  axis  of  inertia  of  the  body.  With  this  choice,  all  the  coupling 
terms  between  the  translational  and  rotational  degrees  of  freedom  vanish  as  Sc  ~  0.  In 
addition,  the  mass  and  inertia  matrices  of  the  body,  M  and  J,  are  given  as 


’m 

0 

O' 

hi 

0 

0  ■ 

M  = 

0 

0 

hi 

m 

0 

0 

m 

,  J  = 

0 

,  0 

J22 

0 

0 

J33. 

(2.11) 


It  is  noted  that  both  the  translational  and  rotational-  degrees  of  freedom  for  rigid  bodies 
are  attached  to  the  mass  center.  This  choice  leads  to  a  different  kinematical  description  of 
joint  constraints  as  compared  to  the  case  of  attaching  the  degrees  of  freedom  at  the  joints. 


2.2  Inertia  Force  Operator  for  Spatial  Beam 
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As  we  intend  to  model  the  flexible  bodies  by  the  finite  element  method,  a  natural 
choice  of  attaching  the  degrees  of  freedom  is  at  the  elemental  nodes  rather  than  at  the 
element  mass  center.  Specifically,  when  we  restrict  ourselves  to  spatial  beams,  the  position 
vector  Up  at  an  arbitrary  point  on  the  beam  can  be  expressed  as  (see  Fig.  2) 


=  (  X  +  u  )’ 


(2.12) 


where  X  =s  {  represents  the  inertial  components  of  the  original  neutral  axis 

position;  u  :=  {  ui,U2,U3  represents  the  inertial  components  of  the  subsequent  total 
translational  displacement  of  the  neutral  axis,  and  —  {  0,f2,f3  }  are  the  body-fixed 
components  of  the  distance  &om  the  beam  neutral-axis  to  the  material  point  located  on 
the  deformed  beam  cross-section.  It  is  noted  that  the  beam  cross-section  is  allowed  to 
rotate  such  that  it  is  not  necessarily  perpendicular  to  the  neutral  sods  in  order  to  model 
transverse  shear  deformations.  Warping  deformation  of  the  cross-section  is  not  considered 
in  the  present  derivation. 

The  velocity,  acceleration,  and  virtual  displacement  vectors  are  obtained  from  (2.12) 
Up  =  e  +  b 

Up  =  e  +  -t-  )  b  •  (2*13) 

^Fp  =  SuTe  +  iTSoi^h 

To  approximate  the  inertia  force  operator  of  the  continuum,  we  interpolate  the  displace¬ 
ment  u  by  linear  shape  functions  in  the  form  [2] 


« =  E  iv/ 


(2.14) 


where  Nj  denotes  the  spatial  linear  shape  functions,  u/  represents  the  degrees  of  freedom 
at  the  element  nodes,  and  npe  denotes  the  number  of  nodes  per  element.  The  virtual 
rotation  can  be  similarly  approximated.  The  discrete  inertia  force  operator  for  the 
beam  elements  can  thus  be  given  by 


npt  np€ 


rE 


(2.15) 


where 


=>  j  NiNKdi  ,  D^(u),di 


represent  the  element  mass  matrix  and  dynamic  moment  due  to  the  centripetal  acceleration 
vector,  respectively.  The  former  will  be  evaluated  as  a  standard  lumped  mass  matrix  for 


the  computational  efficiency  of  explicit  integration  techniques  to  be  described  in  Section 
5,  and  the  latter  will  be  evaluated  £rom  an  average  of  the  element  nodal  angular  velocities. 


2.3  Constraint  Operator  due  to  Joints 

As  a  key  attribute  in  the  development  of  the  present  multibody  dynamics  analysis 
capability  is  the  concept  of  software  modularity,  the  kernel  processing  the  joint  constraints 
must  remain  independent  from  the  other  computational  kernels.  A  joint  is  introduced  to  to 
describe  the  interaction  of  two  or  more  contiguous  bodies  (for  more  detailed  discussions, 
see,  e.g.,  Nikravesh[3]).  Joint  examples  range  from  rigid  connectors,  which  allows  no 
relative  motion  between  two  bodies,  to  devices  that  allows  the  relative  separation  of  the 
bodies  (see  Fig.  3). 

Let  us  consider,  as  an  example,  a  spherical  joint  that  is  characterized  by  imposing  the 
equality  of  the  positions  of  two  connected  bodies  at  a  specific  common  location.  The  center 
of  the  spherical  joint,  called  p,  can  be  represented  in  terms  of  the  two  body-fixed  frames 
(6j, and  where  the  superscripts  (i,  j)  designate  the  two  contiguous 

bodies  under  consideration,  respectively.  The  constraint  condition  that  the  two  bodies  at 
the  point  p  must  have  the  same  translational  motions  in  the  e-basis  can  be  expressed  as 

=  Ui  -h  sj,  -  Uj  -  sj  =  ufe  -f  ijihi  -  uje  ^  fJ^bj  =  0  (2.16) 


To  augment  the  constraint  condition  to  the  equations  of  motion  via  the  method  of  Lagrzmge 
multipliers,  we  must  obtain  as 


=  BM  =  0  ,  (2.17) 

and  the  constraint  Jacobian  matrix  for  the  above  example  is  given  by 

B,  =  ( I ,  ,  -I ,  ]  (2.18) 

where  I  denotes  the  (3  x  3)  identity  matrix  and  5d  is  the  virtual  displacement  vector 


W  =  [  Sui  ,  Soi  ,  Suj  ,  6a j  . 

The  constraint  force  operator  SF^  can  then  be  derived  as 


(2.19) 


(6uf 


6aJ} 


ig)" 


(2.20) 


The  case  of  nonholonomic  constraints,  although  not  elaborated  herein,  can  be  similsu-ly 
derived. 
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3.  Discretization  of  Internal  Force  Operator  for  Spatial  Beams 

The  internal  force  operator  is  the  second  term  in  (2.1) 

where  the  virtual  displacement  gradient  and  the  Cauchy  stress  tensor  are  expressed  in  the 
inertial  frame,  viz.,  e-ba^is.  There  are  two  major  issues  in  the  finite  element  discretization 
of  the  internal  force  operator  for  spatial  beams  for  applications  in  multibody  dynamics 
analysis.  The  first  is  to  preserve  rigid-body  motions  for  beams  that  undergo  large  motions. 
The  second  is  the  choice  of  a  convenient  coordinate  system  so  that  stresses,  straixis,  and 
other  physical  quantities  computed  based  on  that  coordinate  system  maintain  one-to-one 
correspondence  to  those  measured  in  on-line  sensors  and  actuators.  This  is  an  important 
consideration  as  the  present  mvdtibody  dynamics  capability  is  to  be  used  not  only  in  off¬ 
line  simxilations  but  also  in  real-time  loop-in-the-system  computations.  In  other  words,  the 
strains  gage  readings  and  the  computed  strains  should  kinematically  coincide  with  each 
other,  and  similarly  for  the  actuator  force* which  is  based  on  the  computed  stresses  to  be 
applied  to  the  system.  To  this  end,  we  choose  a  convected  frame  such  that  one  of  its  axes 
lies  tangent  to  the  deformed  beam  neutral  axis.  It  will  be  shown  that  this  choice  allows  us 
to  develop  a  simple  additive  stress  update  procedtire. 

Figure  4  illustrates  the  relations  among  the  three  coordinate  systems  employed  for 
the  present  purposes;  the  convected  frame  is  characterized  by  the  unit  triad  vector 
a  =  {  ai,  a2,  as  and  is  related  to  the  inertial  reference  frame  e  by  a  =  T  e.  The 

triad  a  is  chosen  to  remain  constant  along  each  beam  element.  The  difference  between 
a  and  b  can  be  used  to  model  torsion  and  bending  on  the  bezun  cross-section,  and  the 
rotation  matrix  S  is  introduced  for  this  purpose  as  b  =  S  a  such  that  R  =  S  T. 


The  internal  force  operator  can  now  be  tensorially  transformed  into  the  convected 
&ame  a  in  terms  of  the  convected  frame  components  of  the  stress  tensor  (  erfy' )  and  a 
corresponding  convected  virtual  displat  ement  gradient  as 


6F^ 


■L 


1. 


T™  ^  dV 

V  oik 


(3.2) 


where  are  the  T-matrix  components.  By  grouping  the  transformed  deformation  gra¬ 
dient  components  in  terms  of  their  symmetrical  parts  as 


1  /  dSri  dSvi  . 

mi  "T  I  ki  » 


^  2  (  T, 


dU 


di. 


(3.3) 


we  arrive  at  the  following  expression 
8F^ 


=  /  =  f  {ns  S(,  dv 

Jv  Jv  \  J 


(3.4) 
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where  the  notation 


6'  =  {6»6l6  }  =  {  4»n»C  }  I  (  ),;•  =  (  ),;•  +  (  )j,- 

denotes  the  coordinates  of  the  convected  reference  frame  and  the  engineering  shear  strain 
definitions,  respectively.  It  can  be  shown  that  the  remaining  convected-firame  strain  com¬ 
ponents,  (  6e,iii^Se((,S£^^  )  are  identically  equal  to  zero  due  to  the  beam  kinematic  as¬ 
sumptions. 


The  following  virtual  strain-displacement  relations  can  be  deduced  firom  (3.2)  and 
(2.13): 


=  S'y  +  Sk 


where 


^7  =  T 


-603  >  5/c  s= 

S02  J 


60  =  6a 


In  the  above  expressions,  ^7  represents  the  membrane  and  two  transverse  shear  strains, 
6k  the  torsion  and.  two  bending  strains,  60  the  virtual  rotations  of  the  cross-section 
referred  to  the  convected  frame,  and  [  B  ]  the  strain-displacement  relation  matrix.  This 
strain  operator  [  5  ]  is  derived  as 


[5]  = 


0  S^{ks  +  lft)J  ’ 


Tl  s= 


0  0  0 
0  1  0 


by  invoking  the  following  relations  to  effect  the  change  of  the  body  reference  frame  of  the 
cross-section  orientation  in  space  with  respect  to  the  constant  convected  reference  fraune 

d*60  r  d*6a  t  -  c  \  o\ 

-w  =  ^  'w  =  ^  '-r  + 


-T 

«S  = 


The  internal  force  operator  is  put  into  the  following  form  from  (3.4)  and  (3.5)  as 

6F^  =  +  6K^M^}di^J^  {6u^  6a^}  [  B  f  |  |  (3.10) 

where  represent  the  axial  and  transverse  shear  forces  per  unit  length,  and  represent 
the  torsional  and  bending  moments  per  unit  length  given  as 

=  j  a  dA  ,  a  dA  .  (3.11) 

S 


The  computations  of  and  are  effected  by  using  the  following  rate- type  law: 

df,  Ckimpim,  (3.12) 

where  Ckimp  represents  the  material  response  tensor,  and  ^ti  and  represent  the 
convected  frame  stress  and  strain  rates,  respectively.  This  approximate  constitutive  law 
can  be  derived  by  transforming  the  Truesdell  rate  equation  [1],  which  is  an  objective 
equation  based  on  inertial  components  of  Cauchy  stresses  and  the  velocity  gradient  tensor, 
to  the  convected  basis.  This  equation  is  then  integrated  in  time  to  obtain  the  following 
stress  update  formxila 


,«+i 

+  /  cumpil.dt 

Cfc/mp 


(3.13) 


Thus,  the  evaluation  pf  the  internal  force  operator  consists  of  computing  the  strain- 
displacement  matrix  [B]  and  the  streiin  increments  A7  and  A/c  to  update  and 
via  (3.11)  and  (3.13).  These  will  be  discussed  in  the  next  two  subsections. 


3.1  Discrete  Form  of  Internal  Force  Vector 


The  algorithmic  treatment  of  the  nonlinear  stiffness  operator  is  addressed  in  this 
section.  The  explicit  generedized  coordinate  integrator  to  be  discussed  in  Section  5  requires 
an  evaluation  of  the  internal  force  at  a  current  time  step  from  the  coordinates  of  the 
beam  configuration  at  that  time.  The  internal  force  is  first  evaluated  on  the  element  level 
for  all  the  finite  elements  comprising  the  flexible  component  from  (3.10)  as 


/ 


v 


S} 

Si 


r 


(3.14) 


after  which  these  individual  element  computations  are  assembled  to  form  the  internal  force 
of  the  discrete  beam.  The  necessary  computations  to  be  described  are  the  evaluations  of 
the  discrete  strain  operator  [  ]  defined  in  (3.7)  and  the  resultant  stresses  N-f  and 

respectively. 


A  two-noded  beam  discretization  is  employed  in  the  present  work.  For  this  case,  the 
discrete  strain  operator  [Bj']  modeling  a  consistent  assumed  constant  strain  field  (3.5) 
which  eliminates  element  locking  for  transverse-shear  deformable  beams  is  obtained  as 


■  -IT  IT  li,  Sf 

0  0  sr  ( iss  -  ) 


liisr 

sr  ( +  \Ti ) 


(3.16) 
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where  the  subscripts  (1,2)  refer  to  the  element  node  number.  The  convected  frame  T 
matrix,  body  frame  curvature  tensor  ks,  and  element  neutral-axis  length  t  are  constant 
quantities  over  the  element  domain,  while  the  relative  cross-section  deformation  S  matrices 
are  nodal  quantities. 

As  discused  in  (3.11)  and  (3.13),  the  resultant  forces  can  be  obtained  by  the  following 
simple  additive  procedure: 


(3.16) 


The  resultant  stress  increments  ANy  and  AM*  are  obtained  via  the  linearized  constitutive 
relations  given  by 


‘EA 

0 

0  1 

'GJ 

0 

0  ■ 

0  0 

_ 1 

GA 

0 

A7  •  , 

AM^  = 

1 - 

0  0 

Eh 

0 

0 

Eh 

(3.17) 


where  the  strain  increments  A7  and  A/c  are  defined  as  an  incremental  analogy  to  the 
virtual  strains  67  and  Sk.  A  specific  computational  procedure  designed  for  use  with  this 
incremental  interpretation  of  the  continuum-based  formulation  such  that  the  computed 
finite  strain  increments  are  invariant  to  arbitrary  rigid  body  motions  is  discussed  in  the 
next  two  sections. 


3.2  Computations  of  Rotational  Matrices  and  Total  Curvature 

To  evaluate  the  discrete  strzun  operator  [  Bf  )  defined  in  (3.15),  the  computations  of 
T  and  S  rotational  matrices  and  the  total  curvature  ks  are  necessary.  This  is  discussed  in 
this  subsection. 

In  computing  T,  observe  that  the  neutral  axis  of  the  beam  element  is  defined  as  the 
straight  line  connecting  the  two  element  nodes  so  that  it  can  be  directly  calcxilated  from 
the  translational  displacements  output  from  the  generalized  coordinate  integrator.  First, 
denoting  this  unit  tangent  vector  along  the  neutral  axis  as  ai  and  utilizing  the  computed 
component  ai ,  obtain  the  normal  vector  at  node  1  to  the  siorface  formed  by  bj  and  ai 
where  the  subscript  denotes  the  node  number.  Next,  compute  the  angle  tended  by  the  two 
vectors  cos  ^  s=  ai  •  bj[.  The  rotational  operator  that  rotates  a  to  b  can  thus  be  constructed 

S'(n^,^)  =!  cos^I-H  (1  —  cos^)n^n^^  -  sin^  (3,18) 

Once  is  determined,  T  and  S*  are  obtained  by 

T  =  S^^R^  .S’  =  R2T^  (3.19) 
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I 

I 

J- 

When  the  angle  ^  small,  it  is  difficult  to  obtain  the  required  normal  vector  n* .  For  this 
case  (usually,  at  the  begixming  of  the  computations),  we  invoke  the  foUowing  alternative. 
The  as  vector  is  defined  as  the  cross  product  of  ai  with  the  bs  axis  of  ,  and  the  remaining 
axis  as  defined  to  complete  the  righthanded  coordinate  system.  Unlike  the  first  case,  it  is 
noted  that  T  is  first  computed  and  S  is  computed  according  to 

S’  rr  ,  *  =  1,2  .  (3.20) 

These  two  methods  of  computing  T  and  S  matrices  are  shown  in  Fig.  5.  The  rotation 
matrices  of  the  discrete  strain  operator  (3.17)  have  thus  been  obtained. 


The  body  frame  components  of  the  curvatiure  tensor  /c^  defined  in  (3.9)  as 


-T 

«s  = 


are  equivalent  to 


0 

K3 

-Ki' 

( 

-«3 

0 

Ki  ,  «  = 

<  K2 

K2 

~/Ci 

0 

(  «3 

a*  R 

(3.21) 


as  the  convected  frame  T  matrix  is  defined  to  be  constant  along  the  element  domain  where 
the  spatial  differentiation  is  performed.  As  the  Euler  parameters  of  R  are  directly  avail¬ 
able  from  the  generalized  coordinate  integrator  to  be  discussed  in  Section  5,  the  Euler 
parameter  representation  of  finite  rotations  can  be  exploited  to  achieve  a  simple  and  ro¬ 
bust  computation  of  the  element  curvature  as  follows.  The  Euler  parameter  -  curvature 
representation  is 


«■ 


Ht)  - 


E(,.)  I 


(3.22) 


subject  to  the  constraints 


+  q^q  =  1  » 


dqo  _ 

^  q  -  0 


(3.23) 


The  approximation  adopted  herein  to  evaluate  (3.22)  is  given  as 


=  jit. 


gi  )  , 


?a  = 


I  (  gl  +  ) 

5  (  gl  +  92  ) 


(3.24) 


where  the  subscripts  denote  the  nodal  Euler  parameters.  The  above  approximation  sat¬ 
isfies  the  constraint  conditions  in  the  discrete  sense.  It  can  be  shown  that  this  discrete 
computation  is  invariant  to  rigid  rotations  contained  in  the  total  nodal  Euler  parameters 

[4,51, 
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3.3  Computation  of  the  Strain  Increments 

The  stress  update  procedure  given  by  (3.18)  and  (3.19)  requires  an  effective  compu¬ 
tation  of  the  strain  increments.  The  accuracy  in  the  computations  of  the  internal  force 
vector  is  not  only  dictated  by  the  accuracy  in  computing  [jBj]  matrix  but  also  the  strain  in¬ 
crements  as  well.  The  strain  increments  are  recalled  from  (3.8)  by  changing  the  variational 
operator  S  to  the  incremental  operator  A: 


?  _  3Au 

A7  =  T-^  + 


A/C  = 


a  A/3 


where  An  and  A/3  are  displacement  and  rotation  increments,  respectively. 


As  the  preservation  of  zero  strain  states  for  large  rigid  motions  is  a  key  factor,  we 
distinguish  the  rotations  due  to  rigid-body  motions  from  those  due  to  deformations  within 
the  convected  frame  components  of  the  total  rotational  increments  A/3.  To  this  end,  we 
observe  that  the  convected  frame  virtual  rotations  can  be  decomposed  according  to 


=  STa+6<p  (3.25) 

where  S(p  and  Sva  are  the  convected  frame  components  of  the  rigid  body  and  deformation 
incremental  rotations,  respectively,  given  by 

,  SfJ  =  .  (3.26) 

With  the  above  decomposition  of  virtual  rotational  motions  interpreted  incrementally,  the 
incremental  membrane  and  transverse  shear  strains  can  be  computed  by 


'  0 
<  -A<^3 
.  A^j 


+ 


0 


-Ar„, 

At,, 


> 


/ 


(3.27) 


Likewise,  the  incremental  curvatme  representing  the  torsion  and  bending  strains  is  given 
by 

A/c  =  (3.28) 

as  the  incremental  rotations  A<p  defined  from  the  T  matrix  are  constant  over  the  element 
length.  The  incremental  translations  are  defined  as  the  difference  between  a  current  and 
past  displacement  configuration  as 


Au  =  -  u” 


(3.29) 
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The  incremental  rotations  A9  and  Arg  are  interpreted  &om  the  rotation  matrices  AT  rnd 
AS,  respectively,  which  are  defined  in  a  manner  consistent  with  (3.26)  as 

Tn+i  ATT"  ,  S"+^  =  S"AS  .  (3.30) 


With  these  preliminary  concepts,  a  more  detailed  description  of  the  computation  of 
the  present  incremental  strains  are  offered  below. 

3.3.1  Membrane  Strain  Increments 

To  achieve  an  objective  computation,  the  first  two  terms  of  (3.27),  given  as 

A  9Au  f  ^  1 

,  (t-j  ■ 

must  be  computed  such  that  rotation  increment  At,?  compensates  for  the  rigid  motion 
contained  within  the  displacement  increment  Atx.  This  is  accomplished  by  defining  the 
skew-symmetric  matrix  containing  the  convected  frame  rotation  increments  as 


Lif  =  (  -  T"  )  T"+^’'  .  (3.32) 

This  choice  is  a  varied  form  of  the  approximation 

T^+i  _  T"  ci  (  f  )  T"  . 

The  reference  frame  T"'*’^  is  simply  geometrically  midway  between  the  current  and  past 
convected  reference  frames,  viz., 

T"+^  =  AT"+^  T"  (3.4.10) 

AT"+^  =  exp  (  ^At^  )  . 

This  mid-configuration  matrix  is  necessary  to  assure  a  skew  symmetric  result  for  A^^ 
from  (3.32)  as 

A<^^  _  <pn+l  __  ijif*  (jin+.J*' 

_  AT"'*'^  -  AT""*"^ 

To  incorporate  the  computation  (3.32)  within  (3.31),  it  is  necessary  to  use  T"*^^  to  rotate 
the  translational  derivatives  within  (3.31).  The  preceding  incremental  strain  computation 
maintains  correct  rigid-body  states  for  pure  spatial  rigid  rotations,  and  pure  spatial  rigid 
rotations  accompanied  with  a  stretch  of  the  neutral  axis  [4,5]. 

3.3.2  Transverse  Shear  and  Curvature  Strain  Increments 
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Let  us  now  concentrate  on  the  incremental  transverse  shear  and  curvature  strain  incre¬ 
ments  involving  deformational  rotation  increments.  To  achieve  an  incremental  objectivity, 
the  transverse  shear  incremental  strains 


and  incremental  ciirvature  strains 


VtJ 


Lk  = 


dAr. 


A 

are  computed  independently  from  the  membrane  strain  A71  as  follows. 


(3.33) 


(3.34) 


The  rotation  parameters  characterizing  the  defonnational  rotation  increments  Ara 
correspond  to  the  rotational  vector  parameterization  of  AS,  the  magnitudes  of  which  will 
be  limited  at  most  to  45°  in  absolute  angle.  To  compute  Axa,  we  will  adopt  the  follow¬ 
ing  incremental  interpretation  of  the  Rodrigues  parameter  representation  of  the  angular 
variation  [6]  as 

=  rrw '  ^ 

In  the  above,  the  Rodrigues  parameters  0t  and  their  increments  A©(  are  determined  from 
the  S  and  AS  matrices,  respectively,  via  the  relation  [7] 

In  practice,  in.  order  to  maintain  high  computational  accxiracy  within  the  constant  strain 
approximation  context,  we  introduce  a  mid-element  shear  matrix  So  defined  as 

S,  =  R. 

where  the  matrix  Ro  corresponds  to  the  geometric  average  of  the  toted  cross-section  orienta¬ 
tion  matrices  at  the  element  nodes  and  T  is  the  element  convected  frame.  The  mid-element 
toted  orientation  matrix  Ro  cein  be  immediately  found  using  the  normalized  average  of  the 
nodal  Eider  parameters  as  defined  in  (3.24).  The  Rodrigues  parameters  0t  and  A0t  are 
then  obtained  from  the  matrices 

S«+i  Rn-n  ASo  =  Sf  S^+^  (3.37) 

using  (3.36). 


The  elemental  curvature  (3.34)  is  computed  by  differentiating  (3.35)  as 


aAro 


1  •+■  |0tP 


[l-f  0^ 


aA©t 

di 


1  +  10«P 


An 
^  A0t 


(3.38) 
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The  derivative  terms  are  approximated  over  an  element  of  length  t  as 


ae« 

d  A0t 


=  7(0..  -  Su  ) 

=  i  (  Ae,.  -  Ae,.  ) 


using  the  nodal  Rodrigues  parameters  and  A0t{,  i  =  1,2.  It  is  noted  that  this 
approximation  is  valid  as  the  Rodrigues  parameter  are  defined  relative  to  a  common 
elemental  reference  frame  T.  The  non-derivative  terms  are  evaluated  using  the  mid-element 
shear  matrices  defined  in  (3.37). 


4.  Discrete  Equations  of  Motion  for  Multibody  Systems 

In  the  preceding  two  sections,  we  have  formulated  to  compute  the  inertia  force  operator 
the  internal  force  operator  and  the  constraint  force  operator  6F^.  To  complete 
the  derivation  of  the  equations  of  motion,  we  recall  the  external  force  operator  5F^  from 
(2.2)  and  discretize  it  to  take  the  form  , 

Sr,  fidV  =  J  {  Sa‘'  }  I  }  <‘i  (4.1) 

where  represents  the  inertial  components  of  a  force  per  unit  length  acting  on  the  beeun 
neutral  axis  and  represents  the  body-fixed  components  of  a  moment  per  unit  length 
acting  on  the  beam  cross-section.  Finally,  the  traction  operator  6F^  tha+  acts  on  the 
exterior  surfaces  of  the  deformable  body  as  natural  boundary  conditions  can  be  discretized 
as 

6F^  =  ^  ^ 

Assembling  all  the  operators  in  the  virtual  work  expression  (2.2)  and  observing  the  varia¬ 
tional  displacement  {  6u^  S<x^  }  are  arbitrary,  we  arrive  at  the  following  discrete  equa¬ 
tions  of  motion  for  constrained  multibody  systems: 


where 


;]{;}  *  ■  (2;) 

$(u,U,R,U>,t)  0 

"  l/'-i?(u;)-5\u,g)/ 


(4.4) 


in  which  D(w)  represents  the  nonlinear  accderation,  5  tb  e  internal  force  vector,  /  the 
external  force  vector,  and  A  the  constrsunt  force  vector.  As  an  adchtional  number  of 
unknown  Lagrange  multipliers  A  for  each  constraint  condition  have  been  introduced  along 
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with  the  generalized  coordinates  for  each  degree  of  freedom,  the  above  system  of  equations 
must  be  augmented  with  the  constraint  equations  themselves  to  achieve  a  determined 
system  of  equations. 

It  should  be  emphasized  that  both  the  translational  displacement  u  and  the  angvdar 
^  elocity  u  embody  the  large  rigid-body  motions  as  well  as  finable  deformations.  As  such, 
the  inertia  force  expression  is  the  same  for  the  rigid  bodies  and  the  flexible  bodies.  Hence, 
no  additional  degrees  of  freedom  is  necessary  for  incorporating  any  flexible  members.  This 
simplicity  plays  an  important  role  in  the  solution  process  of  the  present  capability. 


5.  Solution  Procedures  for  Constrained  Multibody  Systems 

The  numerical  solution  procedure  for  MBD  systems  which  we  advocate  in  this  chapter 
is  termed  a  ataggcnd  MBD  solution  procedure  that  solves  the  generalized  coordinates  in  a 
separate  module  from  that  for  the  constraint  force  [9].  A  major  advantage  of  such  a  parti¬ 
tioned  solution  procedtire  is  that  additional  analysis  capabilities  such  as  active  controller 
and  design  optimization  modules  can  be  easily  interfaced  without  embedding  them  into  a 
monolithic  program.  The  solution  of  the  equations  of  motion  for  constrained  multibody 
systems  as  derived  in  (4.3),  unlike  typical  structural  dynamics  problems,  must  satisfy  at 
each  time-marching  step  the  system  constraints,  be  they  holonomic  or  nonholonomic,  or 
time-specified  maneuvers.  Because  of  this  distinctive  requirement,  the  reliability  and  cost 
of  a  multibody  analysis  package  can  be  strongly  affected  by  how  efficiently  and  accurately 
the  constraints  are  preserved  during  the  numerical  solution  stage. 

In  the  present  analysis  capability  we  have  chosen  a  hierarchical  approach.  In  this 
approach  we  eliminate  the  constraint  degrees  of  freedom  if  they  are  associated  only  with 
open  rigid  links  and  no  external  torque  or  jwtive  control  devices  are  attached  to  those 
joints.  Otherwise,  the  Lagrange  mtfltipliers  that  correspond  to  the  rest  of  the  system 
constraints  are  computed  via  the  so-called  stabilized  procedure,  which  will  be  described 
shortly.  This  procedure  requires  a  reformulation  of  the  algebraic  constraint  conditions  to  a 
set  of  parabolic  differential  equations  such  that  the  constreunt  forces  can  also  be  integrated 
in  time. 

To  solve  for  the  generalized  coordinates  of  the  multibody  system,  the  equations  of 
motion  are  partitioned  according  to  the  translational  and  the  rotational  coordinates.  This 
sets  the  stage  for  an  efficient  treatment  of  the  rotational  motions  via  the  sing\ilarity-£ree 
Euler  parameters.  The  resvdting  partitioned  equations  of  motion  are  then  integrated  via 
a  two-stage  explicit  stabilized  algorithm  for  updating  both  the  translational  coordinates 
and  angular  velocities.  Once  the  angular  velocities  are  obtained,  the  angular  orientations 
are  updated  via  the  mid-point  implicit  formula  employing  the  Euler  parameters. 

When  the  two  algorithms,  namely,  the  two-stage  explicit  algorithm  for  the  generalized 
coordinates  and  the  implicit  staggered  procedure  for  the  constraint  Lagrange  multipliers. 


16 


axe  brought  together  in  a  staggered  maimer,  they  constitute  a  staggered  expUcit^implicit 
procedure  as  detailed  below. 

5.1  Constraint  Handling  Techniques 

In  principle,  it  is  better  to  eliminate  the  constraint  conditions  if  possible  if  the  cor¬ 
responding  forces  are  not  needed  for  design  or  interface  with  other  analysis  modules.  For 
example,  if  the  system  consists  of  open-tree  configurations  and  no  active  controller  is  ap¬ 
plied,  then  it  is  best  to  eliminate  the  joint  constraint  attributes.  On  the  other  hand,  when 
the  system  includes  multiple  closed-loop  configurations  or  active  controllers  are  present  on 
several  joints,  then  it  becomes  important  to  compute  the  Lagrange  multipliers  as  accurately 
as  possible. 

The  present  capability  employs  two  complementary  procedures  for  handling  the  sys¬ 
tem  constraints.  In  one  procedxire,  we  present  an  implementation  procedure  for  eliminating 
the  open-tree  constraints  via  a  coordinate  partitioning  strategy  in  conjunction  with  a  so- 
called  arrov)  head  solution  technique.  Emphasis  here  has  been  to  implement  the  procedure 
in  parallel  machines.  In  the  second  procedure,  we  present  incorporate  a  stabilization  pro¬ 
cedure  for  solving  the  Lagrange  mxiltipliers  (8,9).  A  distinct  feature  of  this  stabilization 
procedure  is  that  it  can  be  implemented  in  a  stand-alone  module,  thus  can  be  interfaced 
not  only  with  the  equation  solver  for  rigid-body  systems  but  with  that  for  flexible-body 
systems  as  well. 

5.1.1  Paralkl  Implementation  of  Coordinate  Partitioning  Technique 

In  the  first  technique,  a  projection  matrix  that  spans  the  null  space  of  the  constraint 
Jacobian  matrix  [P]  is  first  constructed.  A  parallel  methodology  based  on  a  arrow  head 
algorithm  then  can  be  applied  to  the  resulting  complementary  set  of  equations  of  motion. 
We  will  present  the  procedure  for  open-tree  systems  and  for  a  system  that  contains  closed- 
loops,  a  cut- joint  technique  can  be  used  so  that  the  present  scheme  can  be  equally  applied. 

Let  us  introduce  a  projection  matrix  A  such  that,  when  its  transposed  matrix  acts  on 
the  constraint  force  B^A,  it  gives 

A^B^A  =  0  (5.1) 

This  projection  matrix  can  be  obtained  by  expressing  the  physical  velocity  d  in  terms  of 
the  independent  velocities  d  and  their  time  derivatives  as 

d  =  Ad^,  d  =  Ad^  -{-  Ad^  (5.2) 

Due  to  the  property  of  (5.1),  premuitiplying  the  equations  of  motion  (4.3)  by  A^  yield 

A^Md  =  A^Q  (5.3) 
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M  **  f 

In  conventional  procedure,  d  in  the  above  equation  is  replaced  by  (5.2b)  and  d  is 
then  solved  from  the  reduced  equations  of  motion.  In  the  solution  to  be  described  below, 
instead  of  solving  the  reduced  equations  of  motion,  we  augment  (5.2b)  to  (5.3)  to  form  an 
arrow-head  matrix  equation  [10,111* 


M  -MAl  f  d. 

-A^M  0 


'  /  d  \_/MAd^\ 


which  can  be  partitioned  as  [10,11] 
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(5.5) 


where  n  is  the  total  number  of  bodies  in  the  system.  Decomposed  in  a  manner  convenient 
for  parallel  computations,  one  obtains 


-  **  f 

n 

jscl 

where 

n  n 

~  A  j  Mj,  D(j  rt+1)  —  ~MjAj,  j  ~ 

7=1  7*1 


(5.6) 


?;=(MAd^)j-,  ;  =  l,...,n  j^  =  -^A^Qj- 

7=1 

Each  diagonal  submatrix  M  j  represents  the  local  mass  matrix  which  is  decoupled  and  can 
be  fzMitorized  concurrently.  An  off-diagonal  submatrix  Dy  denotes  the  coupling  between 
two  connecting  bodies  in  the  system.  Since  M  is  a  constant  matrix,  (5.14a)  becomes 


aj=M7‘(Do,.+.,d'-Sr;)  (5.7) 

Substituting  (5.15)  into  (5.14b)  gives  the  well-known  Schur  complement 

ED(»+>,i)M7‘Do,„«,)a'  =  f;D(.+,,i,M7‘q,  -  £D(„+,,,)Aa'  (5.8) 

7=1  7=1  i=l 

The  preceding  treatment  of  the  reduced  equations  of  motion  provides  several  parallel 
computational  features.  First,  the  parallelism  in  multibody  systems  can  be  exploited  by 
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mapping  each  processor  onto  a  group  of  bodies  so  that  independent  computations  such  as 
the  left  hand  side  of  (5.16)  can  be  performed  concurrently.  Second,  since  Mi  is  a  constant 

mass  matrix,  it  needs  to  be  factored  only  once.  Third,  to  solve  for  d^,  a  parallel  sparse 
solver  may  be  utilized*  Finally^  once  d  is  obtained^  the  evaluation  of  d  from  (5.15)  is  also 
easily  parallelizable. 


5.1.2  Stabilized  Constraint  Force  Solution  Procedure 

When  the  Lagrange  multipliers  cannot  be  eliminated  or  are  to  be  retained  for  other 
purposes,  one  must  solve  for  them.  Of  several  tedmiques  available  [12-15],  we  adopt  a 
form  of  stabilized  differential  equations  for  the  Lagrange  multipliers  (8,9).  As  we  shall 
see,  this  choice  allows  the  use  of  a  partitioned  solution  procedure  to  solve  the  generalized 
coordinates  separately  from  the  Lagrange  multipliers.  To  effect  a  partitioned  solution  of 
the  constraints,  a  stabilized  companion  differential  equation  for  the  constraint  forces  is 
formed  by  adopting  the  penalty  procedure[16].  The  penalty  procedure  uses  the  equations 

A  =  i  $  (5,9) 

as  the  basic  constraint  equations  instead  of  (4.3b)  for  both  the  holonomic  and  nonholonomic 
constraint  conditions.  In  the  stabilization  introduced  in  [8],  one  adopts  the  following  time- 
differentiated  expression  for  the  holonomic- case: 

A  =  ifli  ,  =  {^}  (5-10) 

The  numerical  solution  to  the  above  companion  differential  equation  is  effected  as  follows. 

The  constrained  equations  of  motion  (3.32)  axe  integrated  once  from  (3.20)  using  the; 
implicit  integration  rule 


as 

(T+i  =  5  )  +  d"  .  (5.11) 

This  expression  is  substituted  into  (5.18)  to  obtain  the  stabilized  differential  equation  for 
the  Lagrange  multipliers 

eA’*+^  -H  SB  A”+^ 

The  same  integration  rule  is  applied  to  this  equation  to  result  in  the  discrete  update 

(  e  /  +  5^  A"-^^  =  eA"  -f  (5.12) 
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B  +  SBd^  .  (5.13) 

The  solution  procedure  for  A  presented  above  can  now  be  invoked  in  a  staggered  manner 
in  conjunction  with  the  generalized  coordinate  solver  to  be  described  below. 


5.2  Time  Integration  of  the  Equations  of  Motion 

Once  A  is  computed  by  the  procedure  described  in  Sction  5.1  or  d  when  using  the 
partitioning  algorithm,  one  still  needs  to  compute  d,  and  u  and  the  angular  orientation 
matrices  R  (and  their  parameters)  at  each  time  step.  This  task  is  carried  out  by  employ¬ 
ing  an  explicit-implicit  transient  analysis  algorithm  that  exploits  the  special  kinematical 
relationships  of  the  generalized  rotational  coordinates  vs.  the  angular  velocity,  namely, 
the  Euler  parameters.  First,  the  integration  of  the  translational  coordinates  and  the  an¬ 
gular  velocity  is  accomplished  by  the  central  difference  formula.  It  should  be  mentioned 
that  the  use  of  the  central  difference  formula  does  impose  a  stepsize  restriction  due  to 
its  stability  limit  (  <  2)  where  is  the  highest  angular  velocity  of  the  system 

components  for  rigid-body  systems  or  the  highest  frequency  of  the  entire  flexible  members 
for  flexible-body  systems.  The  simplicity  of  its  programming  effort  and  robustness  of  its 
solution  results  can  often  become  compelling  enough  to  adopt  an  explicit  formula,  which 
is  the  view  taken  here. 


5.2.1  Explicit  Generalized  Coordinate  Integrator 


In  conventional  structural  dynamics  analysis,  explicit  time  integration  of  the  equations 
of  motion  by  the  central  difference  formula  involves  the  following  two  updates  per  step: 


d”+‘  =  d”  + 


(5.14) 


where  the  rotational  degrees  of  freedom  are  assumed  to  be  a  infinitesimal  vector.  Unfor¬ 
tunately,  this  simplistic  procedure  is  not  directly  applicable  to  the  rotational  part  of  the 
equations  of  motion  involve  large  motions  such  that  u;  is  not  directly  integrable  to  yield 
the  total  rotational  quantities  except  for  some  special  kinematic  configurations.  This  moti¬ 
vates  us  to  partition  d  into  the  translational  velocity  vector,  u,  which  is  directly  integrable 
and  the  angular  velocity  vector,  w,  which  is  not,  and  treat  them  differently,  viz.: 


(5.15) 


The  equations  of  motion  (5a)  can  be  partitioned  according  to  the  above  partitioning: 


'Mi  0  ]  fu)  rgii 
0  Mu .  \  w  J  \  Qw  J 


(5.16) 
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where 


(5.17) 


/  \  -  D4<i)  -  Sj(d,e)  -  BjA  \ 

\  (3„  /  -  \  f„  -  D„(«)  -  S„{d,  e)  -  A  / 

in  which  the  subscripts  (u,u;)  refer  to  the  translational  and  the  rotational  motions,  re- 
spectively,  f  is  the  external  force  vector,  D  is  the  generalized  damping  force  including  the 
centrifugal  tbrce,  S  is  the  internal  force  vector  including  member  flexibility,  q  is  the  angular 
orientation  parameters,  Bu  &nd  are  the  partition  of  the  combined  gradient  matrices 
of  the  constraint  conditions  (3). 

The  application  of  the  central  difference  formula  to  pbtain  (ti,  for  the  above 

equations  of  niotion  is  given  as  follows.  First,. assume  that  and  are  already 

computed  so  that  we  can  compute  and 


Second,  we  update  the  translational  velocity  and  the  angular  velocity  vectors  at  the  step 
(n+1)  by 


f  =  u”  +  hu^+^Z^ 


(5.19) 


Third,  we  update  the  translational  displacement,  u,  by 

yn+3/2  _  ^n+l/2  ^  /iu”+* 


(5.20) 


A  rec  urement  in  the  explicit  integration  of  the  mtdtibody  dynzimics  equations  is  that 
the  daimping  terras  and  the  moment  due  to  the  centripetal  acceleration  and  Di^  have  to 
be  approximated  as  accurately  as  possible.  This  is  in  part  because  active  control  strategies 
are  strongly  affected  by  the  level  of  deimping,  and  in  part  due  to  numerical  instability 
when  the  term  D^,  =  QJu  is  poorly  computed.  To  see  this,  let  us  integrate  just  a  set  of 
rotational  equations  of  motion 


J  (1)  4-  Q  J  (jJ  =  fw 
by  the  central  difference  formula  to  obtain 

=u^-2 +hJ-\r (5.21) 

Observe  that  by  virture  of  the  central  difference  formula  in  a  full  step  integration  case,  that 
is,  marching  from  t  =  nh  to  f  =  (n  +  l)h,  the  angular  velocity  vectors  are  available  only 

at  the  half-step  intervals,  viz.,  and  .  Hence,  a;”  that  is  needed  in  computing 

u)^J<j}^  is  not  available.  One  algorithmic  way  to  overcome  this  deficiency  is  to  advance 
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only  one  half  step  at  each  integration  step.  In  other  words,  the  next  step  marches  from 
<  =  (n  +  ^)h  to  f  =  (n  +  Z/2)h  instead  of  <  =  (n  +  l)h  to  i  =  (n  +  2)h.  In  this  way,  at 
any  integration  step,  the  w  7  w  term  can  be  computed  accurately.  The  same  procedure 
is  also  used  to  integrate  the  translational  displacements  and  velocities.  To  summarize,  we 
offer  the  following  computational  sequence  which  is  called  a  iwo-stage  txpUcit  integration 
scheme  [9]. 


4.1 

The  computation  of  the  Euler  parameters  in  Step  (d)  will  be  discussed  in  the  next 

4.1 

subsection.  The  computation  of  the  internal  force  5”"^  2  in  Step  (e)  was  detailed  in  Section 

4.1 

3.  Finally,  the  computation  of  the  Lagrange  multipliers  A"‘*'2  was  presented  in  Section 
5.1. 


5.2.2  Rotational  Parameter  Integration 

The  preceding  subsection  discussed  the  two-stage  explicit  integrator  as  applied  to  the 
translational  displacement  and  velocity  coordinates,  and  the  angular  velocity  vector.  To 
obtain  the  rotational  orientation  parameters,  we  employ  the  Euler  parameters:  (  qo,<l  ) 
defined  as 


f3ol 

1  ^  1 

f  cosf  1 

1  ’Si 

1  q  J 

1  1 

n  sin  1  J 

with  constraint  ql  -1-  q^q  =  1 


The  rotation  matrix  is  represented  as  a  function  of  the  Euler  parameters  as 


2{qiq2  +  5093) 
2(90  +  32)  -  1 
2(9293  -  9o9i) 


(5.22) 


R 


2(9^  +  9?) -1 

2(9132-9093) 
.  2(9193  4-  9092) 


22 


2(9133-9092) 
2(9293  +  3o9i) 

2(30+33)-!  . 


(5.23) 


The  choice  of  the  Euler  parameters  allows  one  to  utilize  the  following  kinematical  equations 


q  =  A(a;)  q  , 


which  can  be  integrated  by  the  following  constraint  satisfying  form  of  the  trapezoidal 
formula 

i  (  -  q"  )  =  I  (  +  q-  )  (5.25) 


Due  to  the  structure  of  A,  the  solution  matrix  can  be  analytically  inverted  such  that  the 
discrete  orientation  update 

5"+‘  =  ill  +  5  A(u,"+i)  ]  [  /  +  I  A(a,”+»)  ]  (5.26) 

where 

D  =  1  +  ^  {  wl  +  wl  +  w]  ) 


results.  The  final  result  is  normalized  to  satisfy  the  inherent  Euler  parameter  constraint 
condition.  The  resulting  update  (5.26)  involves  only  explicit  computations  and  is  readily 
incorporated  into  the  two-stage  explicit  integration  procedure  [9]. 


6.  Illustrative  Examples 

In  order  to  illustrative  the  features  of  the  present  multibody  dynamics  aneilysis  capabil¬ 
ity,  four  example  problems  will  be  described:  flexible  double  pendulum,  three-dimensional 
maneuvering  of  space  crane,  paraillel  computations  of  a  simplified  automobile  suspension 
model,  and  deployment  of  a  beam  from  a  rigid  guide. 

The  first  example  problem  is  the  dynamics  of  a  double  pendulum  made  of  flexible 
spatial  beam  members.  This  problem  exhibits  both  the  three-dimensional  deformations 
and  large  rigid-body  motions.  It  has  been  demonstrated  that,  for  a  free  rigid  body  un¬ 
dergoing  only  rotational  motions,  both  the  energy  and  the  momentum  can  be  conserved 
by  employing  a  problem-specific  algorithm  [17].  However,  for  general  multibody  systems 
that  involve  both  the  rotational  and  translational  motions  in  a  coupled  manner  plus  com¬ 
plicated  system  constrjunts,  the  most  one  can  realistically  hope  for  is  the  preservation  of 
the  system  energy  if  the  system  is  conservative.  The  ability  of  the  present  capability  to 
conserve  the  system  energy  is  to  be  demonstrated  by  this  example. 

The  double  pendulum  is  modeled  with  two  beams;  a  spherical  joint  connects  the  last 
node  of  the  first  beam  to  the  first  node  of  the  second  beam  and  also  a  spherical  joint  is 
attached  to  the  root  node  of  the  first  beam.  It  is  noted  that  the  joint  coimection  can  easily 
be  ac'  vnted  for  from  a  finite  element  assemblage  which  leaves  the  rotational  degrees  of 
freedom  free  at  the  hinge  locations.  The  result  from  this  modeling  is  the  same  as  that 
obtained  using  the  Lagrange  multiplier  solver  by  retaining  the  joint  constraint  conditions, 
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thus  establishing  the  viability  of  interfacing  the  spatial  beam  models  with  rigid  elements. 
In  the  first  case,  the  pendulum  is  subjected  to  a  gravity  field  in  the  vertical  z-direction 
and  an  initial  velocity  impifise  in  the  horizontal  x-y  plane  such  that  solely  rigid  motion  is 
excited.  The  problem  is  run  for  four  cases  of  increasing  beam  fiexibility  as  follows: 

1.  EA  *  1.0  X  10*  GA  =  0.5  x  10* 

2.  EA  1.0  X  10^  GA  *  0.5  x  10^ 

3.  EA  =  2.0  X  10^  GA  «  1.0  x  10* 

4.  EA  s  1.0  X  10*  GA  =  0.5  x  10* 

with  the  remaining  parameters 

pA^l  Ibmfin  pi  =  .833  x  10"**  Ibm  in  1  —  1  in 
held  constant.  The  initial  velocity  impulse,  and  the  spatial  trajectories  of  the  mass  center 
of  the  second  beam  as  projected  on  the  x-y  and  x-z  planes  are  given  in  Fig.  6.  The 
trajectory  of  the  first  case  coincides  exactly  with  a  rigid  body  solution  to  the  problem,  and 
the  slight  deviation  of  the  trajectories  due  to  the  increasing  fiexibility  can  be  seen.  The 
energy  time  histories  for  the  problem,  given  in  Fig.  7,  verify  the  high-accuracy  level  of 
the  present  capability  as  energy  is  practically  conserved..  Again,  the  accurate  modeling  of 
the  internal  forces  in  the  three  dimensional  environment  is  demonstrated  by  the  negligible 
strain  energy  contribution  for  all  of  the  four  flexible  cases.  The  time  integration  of  the 
spatial  kinematics  preserves  the  baJzince  between  the  kinetic  and  potentieil  energies  of  the 
problem.  Next,  the  flexible  double  pendulum  is  given  an  initied  velocity  impulse  to  excite 
deformation  motion  as  well  as  the  rigid  motion.  For  this  case  the  parameters  used  were 

EA  =  1.8  X  10*  lb,  GA  =  0.9  x  10®  lb,  El  =r  1.4  x  10®  lb  in* 
pA  —  .9Slbm/in,  pi  =  0.67  Ibm  in,  I  =  120  in. 

The  initial  velocity  profile,  the  resulting  time  histories  of  several  deformed  configurations 
and  energy  time  history  are  given  i.:  Fig.  8,  which  shows  the  large  spatid  rotation  and 
deformation  capabilities  of  the  present  beam  formulation.  The  energy  conservation  is 
retained  for  the  computations  of  spatiad  deformations. 

The  second  example  is  a  rigid  space  crane  model  as  shown  in  Fig.  9.  This  problem 
was  previously  analyzed  by  Gawronski  and  Ih  [18]  by  employing  a  tailored  problem-specific 
formulation.  In  the  present  modeling  analysis,  we  model  the  links  to  be  connected  by 
spherical  and  revolute  joints.  Hence,  the  joint  torques  and  forces  (B*’A)  are  computed  as 
part  of  the  problem  rather  than  to  be  obtained  by  a  post-processing.  The  motion  of  the 
crane  is  triggered  by  a  specified  tip  velocity  from  the  initial  position  to  the  final  position, 
a  nonholonomic  constraint  condition  as  shown  in  Fig.  10.  The  time  histories  of  torques 
in  the  three  joints  are  shown  in  Fig.  11  (for  more  details,  see,  [11]).  In  addition,  during 
the  time  integration  process,  the  maneuvering  of  the  crane  is  controlled  under  the  desired 
trajectories  which  are  given  in  two  different  vertical  planes  as  illustrated  in  Fig.  12. 

The  third  problem  is  a  double- wishbone  automobile  suspension  system  that  is  analyzed 
by  the  parallel  algorithm  of  the  present  capability.  The  problem  definition  and  the  model 
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are  described  in  Nikravesb  [3]  and  is  shown  in  Fig.  13.  The  vehicle  is  partitioned  into  six 
subsystems  where  six  independent  processors  can  be  assigned  to  each  of  the  subsystems 
so  that  the  null  space  of  the  constraint  Jacobian  matrix  can  be  constructed  in  parallel. 
Note  that  the  suspension  systems  possess  four  sets  of  springs  and  dampers  with  given 
locations,  spring  and  damping  coefficients.  The  tires  of  the  vehicle  are  modeled  by  using 
unilateral  spring  elements.  Initially,  the  vehicle  is  positioned  in  a  height  of  one  meter  from 
the  ground  with  initial  velocities  equal  to  zero.  When  the  vehicle  is  released,  gravity  acts  as 
the  external  loads  so  that  the  vehicle  experiences  a  free  fall  until  it  hits  the  groimd.  Figure 
14  illustrates  one  of  the  springs  that  reacts  to  the  ground  constraint  during  one  second 
simulation  nmtime.  Table  1  provides  the  speedup  and  computational  efficiency  vs  the 
number  of  shared-memory  processors.  It  is  noted  that  a  speedup  of  about  4.5  is  achieved 
when  six  processors  are  utilized,  thus  indicating  the  potential  of  parallel  computations 
toward  real-time  simulations  and  the  arrow-head  solution  strategy  adopted  in  the  present 
capability. 

The  final  example  is  the  deployment  of  a  flexible  beam  from  a  rigid  fixture,  which 
simulates  paper  ejection  from  a  printer  or  deployment  of  a  solar  pannel  from  the  stowed 
satellite  structure.  In  extending  the  present  three-dimensional  flexible  beam  module  to 
model  axially  moving  three-dimensional  beams,  the  present  capability  has  added  the  fol¬ 
lowing  two  salient  features  (see,  for  details.  Downer  and  Park  [19]).  First,  Hamilton’s  law 
of  varying  action  is  chosen  as  a  variational  frame  for  the  discrete  approximation  of  the 
governing  dynamics  of  moving  beams.  As  such,  the  discretization  of  a  complicated  con¬ 
vective  acceleration  is  avoided  as  the  use  of  Hamilton’s  law  requires  only  the  first  materied 
time-derivative  of  the  convective  displacements.  Second,  in  the  finite  element  approxima¬ 
tion  of  the  moving  beam,  we  fix  the  number  of  discrete  points  and  allow  the  length  of  each 
discrete  beam  element  to  vary. 

This  extended  capability  was  used  to  analyze  a  thin  beam  deploying  from  a  rigid 
horizontal  guide  into  a  uniform  gravitational  field  and  compared  to  results  reported  in 
Mansfield  and  Simmonds  [20],  who  modeled  the  bezun  as  m  axially  moving  elasticai. 
Figmes  15  and  16  illustrate  the  basic  kinematics  and  the  beam  deployment  results  vs 
different  deployment  velocities.  Two  characteristic  parametrizations  of  the  problem  are 
dimensionless  weight- to-stifihess  ratio  ss  mgi^  /  El  and  a  dimensionless  velocity 
u  =  Vlyjmt  /  El.  In  these  expressions,  m  is  the  mass  per  unit  area  of  the  paper,  g 
is  the  acceleration  of  gravity,  I  is  the  length  of  the  paper,  El  the  bending  stiffriess,  amd 
V  the  constant  velocity  of  the  paper  ejection.  The  amalysis  was  performed  with  /x  =  50 
and  =  100, 50, 20, 10  corresponding  to  y  —  92,65,41,20  in/sec,  respectively.  The 
trajectories  of  tip  of  the  beam  tip  for  the  various  deployment  speeds,  as  obtained  by  the 
present  capability,  aure  shown  in  Fig.  16  and  compared  to  the  static  shape  of  a  fully  extended 
cantilevered  beam.  The  present  results  au-e  comparable  to  those  reported  in  Mansfield  and 
Simmonds  [20] . 


7.  Discussions 
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A  multibody  dynamics  analysis  capability  that  consists  of  independent  analysis  ker¬ 
nel  modules  and  that  utilizes  a  partitioned  computational  procedure  is  presented.  The 
present  software  architecture  is  designed  to  run  the  resulting  program  efiSciently  both  on 
sequential  as  well  as  parallel  computers.  The  presently  fully  operational  modules  are  a 
three-dimensional  beam  processor,  a  joint  and  stabilized  constraint  processor,  an  explicit 
time-integration  modtde,  a  Hamiltonian  plane  beam  deployment  dynamics,  a  conjugate 
gradient-based  rigid-element  parallel  solver,  and  a  linearized  vibration  control  synthesizer. 
Future  planned  additions  include  a  three-dimensional  plate  element  processor,  active  con¬ 
trollers  for  large  slewing  motions,  and  parallel  flexible  multibody  solver.  It  shotdd  be  em¬ 
phasized  that  the  primary  goal  of  the  present  undertaking  is  to  develop  a  highly  accurate 
multibody  dynamics  capability  for  space  applications  as  well  as  high-precision  manufac¬ 
turing  real-time  simulations  such  electronics  assembly.  This  does  not,  however,  preclude 
the  use  of  the  present  capability  for  conventional  multibody  applications  as  demonstrated 
in  the  analysis  of  automobile  suspension  dynamics. 
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Initial  Beam  Position  vs.  Initial  Velocity  Profile 
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Fig.  6a  Spatiail  Motion  of  Double  Pendulum:  Problem  Data 
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Fig.  6b  Spatial  Motion  of  Double  Pendulum:  Projected  Trajectories 
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Fig.  8a  Spatial  Motion  of  Double  Pendulum:  Problem  Data 


Fig.  8b  Spatial  Motion  of  Double  Pendulum:  Motion  History 
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Fig.  8c  Spatial  Motion  of  Double  Pendulum:  Energy  History 


Fig.  9  Crane  Configuration  and  Subsequent  Motion 
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Fig.  10  Tip  Velocities  for  the  Rigid  Space  Crane 
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Fig.  11  Time  Histories  of  Torques  in  the  Connecting  Joints 


Fig.  12a  Manipulator  Configuration  Along  the  X-Y  Plane 


Fig.  12b  Manipulator  Configuration  Along  the  Z-Y  Plane 
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Fig.  14  Force  Storage  in  Springs 
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CPU  Time  Consumed 
(sec)  Per  Time  Step 

Speed  Up 

Efficiency 
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1.842 
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1.901 
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1.708 
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Table  1  Performance  of  the  Present  Parallel  Scheme  Using  Alliant  FX/8 


Fig.  15  Deployment  Kinematics 


Fig.  16  End  Orbits  for  Various  Deployment  Speeds  (V) 
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Summary 

The  core-congruential  formulation  (CCF)  of  geometrically  nonlinear  finite  elements 
based  on  the  Total  Lagrangian  (TL)  description  is  presented.  Although  the  key  ideas 
behind  the  CCF  can  be  traced  back  to  Rajasekaran  and  Murray  in  1973,  it  has  not 
subsequently  received  serious  attention.  The  CCF  is  first  described  in  general  form  and 
then  applied  to  the  derivation  of  geometrically  nonlinear  truss,  plane  stress,  and  Timo¬ 
shenko  beam  elements  using  the  Green-Lagrange  strain  measure.  Several  advEintages  of 
the  CCF,  notably  the  physically  clean  separation  of  material  and  geometric  stiffnesses, 
and  its  independence  with  respect  to  the  ultimate  choice  of  shape  functions  and  element 
degrees  of  freedom,  ai-e  noted.  Two  problems  involving  very  large  motions  solved  with 
the  beam  element  display  the  range  of  applicability  of  this  formulation,  which  trascends 
the  kinematic  limitations  commonly  attributed  to  the  TL  description. 

1  Introduction 

There  is  zm  elegant  Total  Lagrangian  (TL)  formulation  of  geometrically  nonlinear  finite 
elements  that  has  received  little  attention  in  the  literature.  This  will  be  referred  to  as 
the  core-congruential  formulation,  or  CCF,  in  the  sequel.  The  key  concepts,  presented 
by  Rajasekaran  and  Murray  in  1973  [1],  evolved  from  the  analysis  and  reinterpretation 
of  the  pioneer  work  of  Mallet  and  Marcal  [2],  as  well  as  Murray’s  previous  work  in 
geometrically  nonlinear  finite  element  analysis  [3].  The  discussion  of  [1]  by  Felippa  [4] 
provided  parametric  expressions  for  the  stiffness  matrices  that  appear  at  various  levels 
of  the  discrete  governing  equations. 

In  1987  a  coiurse  in  nonlinear  finite  elements  offered  by  the  first  author  presented  the 
derivation  of  several  elements  using  the  CCF.  Prepeiration  of  homework  assignments  Eind 
feedback  from  students  helped  to  streamline  the  material.  Subsequently  the  doctoral 
thesis  by  Crivelli  [5]  made  extensive  use  of  the  CCF  in  the  systematic  development  of  a 
three-dimensional  nonlinear  Timoshenko  beam  element  capable  of  imdergoing  arbitrar¬ 
ily  large  rotations.  This  particulzu*  application  pushed  this  formulation  beyond  frontiers 
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hitherto  deemed  impassable  by  a  TL  element  with  rotational  degrees  of  freedom.^  Expe¬ 
rience  has  shown  that  the  beam  formulation  exhibits  computational  robustness  lacking 
in  other  TL  formulations  that  incorporate  arbitrary  kinematic  approximations  ab  initio. 

The  central  idea  of  the  CCF  is  the  construction  of  TL  stiffness  matrices  for  geometrically 
nonlinear  analysis  through  the  scheme 

(1) 

Jv 

where  S  is  the  core  stiffness  matrix,  K  the  physical  stiffness  in  terms  of  node¬ 
displacement  degrees  of  freedom  v,  G  a  core-to-physical-£reedom  transformation  matrix 
independent  of  v,  V  the  appropriate  integration  volume,  and  in  which  “level”  identifies 
the  governing  equation  level  at  which  the  stiffness  matrix  is  used.  The  three  levels  of 
main  interest  in  practice  are:  energy,  force  equilibrium,  and  first-order  incremental  equi¬ 
librium.  The  core  stiffness  matrix  is  expressed  in  terms  of  the  displacement  gradients 
at  each  material  point.  Displacement  gradients  g  make  a  better  choice  of  core  variables 
than  finite  strains  because  for  many  element  types  they  can  be  expressed  linearly  in 
terms  of  node  displacements  v  as  g  =  Gv,  a  property  that  validates  (1)  for  all  levels.^ 

The  qualifier  “core”  emphasizes  the  independence  of  with  respect  to  discretization 
decisions  such  as  element  geometry,  shape  functions,  and  choice  of  nodal  degrees  of 
freedom.  Such  a  dependence  is  introduced  by  the  congruential  transformation  indicated 
in  (1)  zmd  the  integration  over  element  volumes. 

The  CCF  has  several  advantages  noted  later.  But  perhaps  the  most  important  one 
is  the  clean  separation  of  physical  effects.  The  importance  of  this  factor  should  not 
be  underestimated,  because  physical  transparency  is  the  key  to  success  in  nonlinear 
analysis. 

As  a  final  general  remark,  the  specialization  of  (1)  to  linear  analysis  does  not  yield 
directly  the  well  known  B^EB  integrand  of  the  standard  formulation  of  linear  stiff¬ 
ness  matrices.  This  shows  that  such  an  alternative  congruential  form  does  not  extend 
natureilly  to  geometrically  nonlinear  analysis.® 


^  The  conventional  wisdom  is  that  TL-based  elements  would  utterly  fail  beyond  moderate 
rotations,  and  an  updated  Lagrangian  or  corotational  description  is  necessary  for  handling 
truly  large  motions.  For  example,  recently  Mathiasson  et.al.  [6]  concluded  that  “The  TL 
formulation  can  only  be  used  in  problems  with  small  or  moderate  displacements.” 

^  If  G  depends  on  v,  the  transformation  in  (1)  is  more  complex  and  varies  with  level,  as 
discussed  in  Section  6. 

®  Indeed,  naive  generalization  of  the  B^'EB  form  to  nonlinear  analysis  led  several  investi¬ 
gators  to  incorrect  results  during  the  60’s  and  70’s. 
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2  Historical  Background 


In  1968  Mallet  and  Marcal  [2]  presented  a  standard  nomenclature  for  geometrically 
nonlinear  finite  element  structural  analysis  based  on  the  Total  Lagrangian  (TL)  de¬ 
scription.  Consider  a  discrete,  finite  element  model  of  a  static  structural  system  under 
dead  loading  with  nodal  displacement  degrees  of  freedom  collected  in  array  v.  Displace¬ 
ments  are  measured  from  a  fixed  reference  configvuration  to  a  current  configuration 
C*.  The  virtual- work  conjugate  forces,  independent  of  v,  are  collected  in  array  p.  The 
system  has  a  total  potential  energy  function  J  =zU  —  W  that  is  the  difference  between 
the  strain  energy  U  and  the  loads  potential  W  —  p^v.  The  residual  node  forces  are 
r  =  dJfdv,  and  the  symbol  A  denotes  increment  associated  with  the  variation  of  the 
current  configuration. 

Mallet  and  Marcal  expressed  the  total  potential  energy,  the  residual  (force-balance) 
equilibrium  equations,  and  the  incremental  equilibrium  equations  as  follows: 

J  =  C/ -  vr  =  [Ko  +  IN,  +  iNj]  V  -  p^v,  ,  (2) 

r  =  ^  =  [Ko  +  jN,  +  IN2]  V  -  p  =  0,  (3) 

Ar  =  [Ko -f  Ni -f  N2]  Av  -  Ap  =  0.  (4) 

Here  Ko  is  the  linear  stiffness  matrix  evaluated  at  the  reference  configuration,  whereas 
Ni  and  N2  are  nonlinear  stiffness  matrices,  eJso  evaluated  at  the  reference  configuration, 
that  depend  linearly  and  quadraticeilly,  respectively,  on  the  node  displacements  v.  The 
N  matrices  were  said  “to  repeat”  in  the  foregoing  expressions. 

Five  years  later  Rajasekaran  and  Murray  [1]  examined  more  critically  the  structure  of 
the  matrices  that  appear  in  the  above  equations.  In  that  investigation  they  chose  to 
start  from  the  “core”  stiffness  matrices  corresponding  to  K,  Ni  and  N2  expressed  in 
terms  of  displacement  gradients,  and  in  doing  so  laid  down  the  main  idea  of  the  CCF. 
Working  with  specific  elements  they  showed  that  the  nonlinear  stiffness  matrices  Ni 
emd  N2  are  not  uniquely  determined.  Indeed  (2)-(4)  as  written  are  unique  only  for  a 
single  degree  of  freedom.  They  did  not  present,  however,  a  general  expression  valid  for 
arbitrary  elements.  This  was  partly  done  by  Felippa  [4],  who  in  the  discussion  of  [1] 
considered  again  those  equations,  rewritten  here  in  a  more  general  and  compact  form: 

J=lv’'K‘'v+{p”-p)’’v,  (6) 

r  =  K'’  V  -f  p°  -  p  =  f  -  p  =  0,  (6) 

Ar  =  K  Av  —  Ap  =  0,  (7) 

in  which  the  notation  of  this  paper  —  rather  than  that  of  [4]  —  is  used.  Here  K^, 
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K**  and  K  denote  the  energy y  secant  and  tangent  stiffiiess  matrices,  respectively^.  In 
addition,  p®  is  the  prestress  force  vector^  which  vanishes  if  the  reference  configuration 
is  stress  free  and  was  omitted  in  (4],  and  f  =  K’’v  +  p®  is  the  internal  force  vector. 
The  tangent  stiffness  is  of  course  fundamental  in  incremental-iterative  solution  methods 
and  stability  analysis,  while  the  secant  stifhaess  (by  itself  or  in  the  internal-force  form 
K^'v  +  p®  )  is  important  in  pseudo-force  methods.  The  energy  stiffness  enjoys  limited 
application  per  se  but  has  theoretical  importance  as  source  for  the  other  two. 

In  linear  problems  =:  K  ==  Ko  and  the  three  stiffness  matrices  coalesce.  But 

in  nonlinear  problems  not  only  do  the  matrices  differ  but,  as  shown  in  the  next  section, 
and  K*"  may  involve  arbitrary  scalar  coefficients.  Such  parametrized  expressions 
were  given  in  [4]  under  the  following  restrictions: 

(Rl)  K*"  is  symmetric. 

(R2)  The  reference  configxiration  is  stress  free. 

(R3)  The  finite  strain  measure  is  quadratic  in  the  displacement  gradients. 

(R4)  The  trjinsformation  between  core  and  physical  freedoms  is  linear. 

The  following  treatment  eliminates  restrictions  (Rl)  and  (R2)  altogether,  and  the  other 
two  selectively. 

3  Core  Stiffness  Equations 

A  conservative,  geometrically  nonlinear  structure  under  dead  loading  is  viewed  as  a 
continuum  undergoing  finite  displacements  u.  These  displacements  are  measured  from  a 
fixed  reference  configuration  C®  to  a  vziriable  current  configuration  No  discretization 
into  finite  elements  is  implied  at  this  stage.  We  confine  our  attention  to  the  case  in 
which  the  structure  behavior  stays  within  the  linear  elastic  ramge,  thus  implying  small 
deformational  strains  but  arbitrarily  large  rotations.  Corresponding  points  or  particles 
in  the  reference  and  current  configuration  are  referred  to  a  fixed  Cartesian  coordinate 
system  and  have  the  coordinates  JC,-  and  x,-  (i  =  1, . . .  n^),  respectively,  where  rid  is  the 
number  of  space  dimensions.  The  displacement  field  components  are  u,-  =  x,-  —  Xi. 

Let  the  state  of  strain  at  a  particle  in  the  current  configuration  be  characterized  by  n, 
strains  e,-  (i  =  1,2,...  n,)  collected  in  an  array  e,  and  let  the  corresponding  conjugate 
stresses  be  s,-  (i  =  1, 2, . . .  n,),  collected  in  an  array  s.  Using  the  summation  convention 
the  elastic  stress-strain  relations  are  written 

Si  =  s®  -i-  EijCj,  with  Eij  =  Ejiy  or  s  =  s®  -f  Ee,  (8) 


*  Energy  and  secant  stiffnesses  are  not  denoted  by  K*  and  K*  because  such  symbols  are 
used  for  other  purposes  in  the  finite  element  course  noted  in  the  Introduction. 
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where  are  stresses  in  the  reference  configuration  (stresses  that  remain  if  e,-  =:  0,  also 
called  prestresses)  and  Ei^  are  elastic  moduli  arranged  as  a  x  n«  square  array  in  the 
usual  manner. 

Let  U,  Wf  9  and  T  denote  the  analogues  of  J,  U,  W,  p,  f  and  r,  respectively, 
at  the  particle  level.^  The  strain  energy  density  can  be  expressed  as 

U  =  c,S|  +  ^eiEijCj  =  +  je^Ee.  (9) 

The  total  strain  energy  U  is  obtained  by  integrating  (9)  over  the  structure  volume: 
U  =  JyU  dV]  the  integration  taking  place . —  as  can  be  expected  in  a  TL  description 
—  over  the  reference  configuration  geometry. 

Next,  introduce  the  Ug  displacement  gradients  gmn  =  du^ldXn.  These  are  subse¬ 
quently  identified  as  g,  (i  —  l,2,...n,)  so  they  can  be  conveniently  arranged  in  a 
one-dimensional  array  g.  Following  [2],  assume  that  the  strains  Ci  are  linked  to  the 
displacement  gradients  through  matrix  relations  of  the  form 

e.  =  hfg-f-ig^Hig,  i  =  l,2,...,n,  (10) 

where  h,-  and  Hj  are  arrays  of  dimension  rig  x  1  and  rig  x  rig,  respectively,  with  H,' 
symmetric.  In  [2]  and  [4]  it  was*ass\imed  that  H,-  is  independent  of  g,  which  )■;  the  case 
for  the  Green-Lagrange  strain  measure.  This  restriction,  labeled  (R3)  in  Section  2,  will 
be  enforced  below  except  in  Section  5.  As  noted  previously,  for  deriving  core  equations 
we  regard  the  displacement  gradients  g  as  degrees  of  freedom.  On  substituting  (8)  emd 
(10)  into  (9)  we  obtain  the  “core  counterparts”  of  (5)-(7),  in  which  v  has  become  g: 


J  -  w  =  ig^S^g  -f-  (^  °  -  ^)^g. 

(11) 

87 

T  =  =  S’’g-1- =  $  -  ^  =  0, 

og 

(12) 

AT  =  SAg-A^  =  0. 

(13) 

Here  S^,  S”  and  S  denote  the  energy,  secant  and  tangent  core  stiffnewS  matrices,  eind 
which  is  independent  of  g,  is  the  core  coimterpart  of  p°.  With  this  notation  the 
first  and  second  variations  of  the  strain  energy  density  can  be  epq^ressed  as 

6U  =  5g^(S^g  +  ^‘’)  +  -  Sg^  (S’’g  +  =  ^g^$,  (14) 

6'^U  =  ^g^S*"  Sg  +  Sg’^SS^'g  +  (^^g)^$  =  ^g^S  Sg.  (15) 

*  The  first  three  acquire  the  meaning  of  energy  densities,  whereas  '4'  is  a  dead-loading 
applied  force  density  independent  of  u. 


5 


These  variational  equations  implicitly  detennine  S'",  $  and  S  from  and  If 
restriction  (R4)  holds,  the  term  drops  out.*  For  convenience  introduce  the 

following  rig  x  rig  matrices  (vrith  summation  convention  implied): 

So  =  £.,hih,-,  S,=£yhig’’Hy,  s;  =  £!„(hfg)H„ 

*  m  (16) 

S,  =  Eli  Hi  gg’^Hj,  s;  =  Eli  (g’^Hig)  Hj, 

where  parentheses  are  used  to  emphasize  the  grouping  of  scalar  quantities  such  as 
g^Hig.  It  may  be  then  verified^  that,  if  assumptions  (R3)-(R4)  of  Section  2  hold,  the 
core  stiffuesses  and  prestress  vector  in  (12)-*(14)  possess  the  general  form: 

S"(,aJ)  =  So  +  ia(Si  +  Sf)  +  (1  -  a)Sl  +  +  1(1  -  ^)S;  +  J?Hi, 

s''(^,  0)  =  So  +  ^s, + ^sf + (1  -  «s;  + 1(2  -  «Sj  +  i<(.s; + j?Hi,  (i7) 

S  =  So  +  S,  +  sf  +  s;  +  So  +  Is;  +  sjHj,  =  a?hj. 

Here  a,  4'  end  0  ere  arbitrary  scalar  coefBcients  in  the  sense  that  g^S^g  and  S''g 
are  independent  of  them.  In  fact, 


$=S’-g  +  «r‘’  =  s,b,-  (18) 

where  b,-  is  defined  in  (20).  The  expressions  are  more  general  than  those  given  in  [4] 
because  restrictions  (R1)-(R2)  of  Section  2  are  no  longer  assumed.  Note  that  S’"  becomes 
symmetric  if  <ii  =  1  /2. 

The  “repeatable  forms”  of  equations  (2)t(4)  are  obtained  ifa  =  /5  =  ^  =  2/3  and 
(f>  =  1/2,  in  which  case  the  combinations  Sj  +  Si  +  SJ  and  S2  +  become  the  core 
counterparts  of  Ni  and  N2,  respectively.  But  this  observation  has  largely  historical 
interest.  More  physically  relevant  eire  the  following  combinations: 

80  =  81+8^  +  82,  Sa/=So+So, 

„  (19) 

SG  =  Sl  +  iS;  +  3?H.  =  s.H.-. 

These  axe  the  core  versions  of  the  initial-displacemeni,  material  and  geometric  stiffness, 
respectively.  The  core  tangent  stiffness  is  8  =  So  +  So  +  Sg  =  Sm  +  Sg. 


*  If  g  =  Gv  with  G  independent  of  v,  g  —  =  0  because  v  are  independent 

variables.  On  the  other  hand,  if  displacement  gradients  are  nonlinear  functions  of  node 
displacements  expressable  as  g,-  =  gi(v/),  then 


Sg,- 


dgi 

dvj 


Soj  —  , 


S^gi  = 


d^gi 

dvjdvk 


SvjSvk  + 


dgi 

dvj 


V;  =  Fijk  Svj  Svk. 


Thus  Sg  is  still  G5v  but  S^g  =  (FSv)Sv,  where  F  is  a  cubic  array. 

^  The  verification  was  done  by  hand  for  [4],  and  rechecked  with  the  MACSYMA  symbolic 
algebra  computer  system  14  years  later. 


6 


4  Spectral  Expression  of  Core  Stiffnesses 


There  is  an  alternative,  more  compact  expression  of  the  core  stiffnesses,  not  presented 
in  [4],  that  offers  theoretical  as  well  as  implementational  advantages  at  the  cost  of  some 
generality.  Define  vectors  b,-  and  c,-  as 

e.=crg,  Ci  =  hi  +  |Hig,  b,  =  ^=h.+H,g.  (20) 

Then  the  spectral  forms*  are 


S''(1.1)=S''  =E.-^CicJ-l.s?Hi, 

las=;9asl 

(21) 

s''(0,0)  =  =  BybfcJ  +  4Hi, 

(22) 

S’-(l,  1)  =  =  i!yc,cj  +  ^(y,.  +  ,9)Hi, 

(23) 

S  =  SjjbibJ*  +  jiHi  ^  S\i  +  Sg. 

(24) 

Note  that  S'(i,  1)  is  symmetric  but  S'’(0,0)  is  not.  It  is  seen  that  for  energy  and  secant 
stiffnesses,  compactness  is  paid  in  terms  of  settling  for  specific  coefficient  values.  The 
foregoing  relations  may  be  obtained  by  repeated  differentiation  of  U  with  respect  to  g. 
A  lesson  from  this  observation  is  that  direct  differentiation  of  nonlinear  matrix  relations 
may  conceal  the  richness  of  possible  expressions  as  revealed  in  equations  (17). 


5  Generalization  to  H(g) 


An  advantage  of  the  spectral  forms  is  that  the  complication  introduced  by  Hj  being 
functions  of  g  (as  it  happens  for  all  nonlinear  strain  measures  except  Green-Lagrange’s) 
can  be  accommodated  by  redefining  some  of  the  previous  relations  as  follows: 


de,- 

5g 


=  h,  +  H^g, 


h:=h,+ 


dHj 

5g’ 


dhj  _  dhj 
dgdg  ”  dg 


s^{0,0)  =  EiybiCc;)^ +j?h;,  s  =.  i5yb?(b*)’’  +  j.-nr 


(25) 


There  is  no  simple  form  of  S''(  1)  equivalent  to  (23),  and  indeed  symmetric  forms  of 

S’*  do  not  generally  exist  if  strain  measures  other  than  Green-Lagrange’s  are  used. 


*  So  called  because  of  the  formal  similarity  of  equations  (21)-(24)  with  the  spectral  decom¬ 
position  of  a  matrix  as  the  sum  of  rank-one  matrices. 
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6  Transformation  to  Physical  Coordinates 

Subdivide  the  continutun  into  finite  elements.  Over  each  individual  element®  the  dis¬ 
placement  field  =s  (ui,  U2t  U3)  is  given  by  u  =  Pv,  where  v  now  collects  the  element 
node-displacement  degrees  of  freedom  and  P  is  a  matrix  of  shape  functions.  If  the 
displacement  gradients  are  linear  in  v,  differentiation  yields  g  =  Gv,  5g  =  G  6v  and 
S^g  =s  0  (cf.  footnote  6).  Invariance  of  the  strain  energy  variations  6U  and  S^U  obtained 
by  integrating  (14)  and  (15)  over  V  yields 

K^=  /  G^S^GdV,  K’’=  /  G'^S^G  dV,  K  =  /  G^SGdV,  p  =  /  G'^^  dV, 
Jv  Jv  Jv  Jv 

(26) 

where  V  stands  now  for  the  tltmtnt  volume,  and  the  last  transformation  also  applies 
to  Although  the  dependency  of  and  $  on  g  is  not  made  implicit  in  these 
equations,  it  must  be  remembered  that  the  transformation  g  =  Gv  also  appears  there. 
Because  of  the  ensuing  algebraic  complexity,  numerical  integration  is  generally  required 
unless  the  gradients  are  constant  over  the  element. 

Often  G  is  expressed  as  a  chain  of  transformations,  some  of  which  are  position  dependent 
and  remain  inside  the  integral  whereas  others  are  not  and  may  be  taken  outside.  For 
example,  in  the  bar  element  studied  below,  G  =s  TD,  where  D  transforms  g  to  local 
node  displacements  and  T  transforms  local  to  global  node  displacements. 

ff  the  relation  between  g  and  v  is  nonlinear  so  that  g  =  g(v),  then  G  =  dg/d\  depends 
on  V,  and  transformation  rules  change  with  level.  This  complication  occurs  in  elements 
with  rotat.onal  freedoms,  such  as  beams,  plates  £md  shells,  if  finite  rotations  are  exactly 
treated.  Both  residual  and  incremental  levels  are  affected.  At  the  residual  level,  K'" 
cannot  be  extracted,  except  artificially,  and  it  is  better  to  work  with  the  internal  force 
vector  f  =  JyG^^dV  —  fyG'^SihidV  directly.  At  the  incremental  level,  the  term 
in  (15)  must  be  retained  because  does  not  vanish.  InvEiriance  of  S^U  yields 

K=  /(G^SG-f  Q)dy,  (27) 

Jv 

where  S  is  that  given  in  (17),  and  the  entries  of  the  symmetric  matrix  Q  are,  from 
footnote  6  and  equation  (18): 

Qjk  =  Qkj  =  Fmjk^m  =  (28) 

in  which  denotes  the  entry  of  b^.  It  is  seen  that  Q  vanishes  in  a  stress-free 
state  and  can  be  therefore  viewed  as  a  correction  tc  the  geometric  stiffness  matrix. 

®  For  simplicity  elements  will  not  be  identified  by  an  element  index  in  the  sequel. 
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7  Example  1:  3D  Bar  Element  (n^  =  3,  n,  s=  1,  Ug  =  3) 


The  first  CCF  application  example  is  to  a  two-node  prismatic,  straight  bar  element 
of  reference  length  L  and  cross  section  area  A  in  3D  space.  To  simplify  node  sub¬ 
scripting  notations,  Cartesian  reference  systems  and  displacement  components  will  be 
denoted  by  (j?,K,Z),  (x,y,z)  and  (uxtuy^uz)  rather  than  (Xi,X2,X3),  (xi,X2,X3) 
and  (ui, U2>  respectively.  The  bar  node  displacements  are  uyn,  vzn),  n  =  1, 2. 


In  the  reference  configuration  the  bar  element  is  referred  to  a  local  Cartesian  system 
with  X  located  along  the  bar  axis,  so  that  the  element  extends  from  node  1 
at  (0,0,0)  to  node  2  at  (£,0,0).  The  current  configuration  is  also  straight  and  extends 
from  (xi  =  vxi,yi  =  =  vzi)  to  (x2  —  L+vx2,&2  =  VY2fX2  =  VZ2)-  The  element 

displacement  field  in  local  coordinates  may  be  expressed  as 


u 


1 

0 

0 

C 

0 

o' 

UY 

►  = 

0 

1-C 

0 

0 

C 

0 

< 

0 

0 

1-C 

0 

0 

c. 

VYl 
Vzi 
VX2 
VY2 
I  VZ2  ) 


=  Pv, 


(29) 


where  (  =  X/L  is  &  natural  axial  coordinate  %'arying  from  0  to  1.  The  three  displacement 
gradients  that  intervene  in  the  definition  of  nonlinear  strains  are 

( dux/dx  \ 


g=  \ 


9i 


1 


52  }  =  <  duyldX  >  =  7 

[  dUzfdX  J  ^ 


U3  j 


-10  0 
0-10 
0  0-1 


1  0  0 
0  1  0 
0  0  1 


Idv 


(30) 


As  strain  measure  we  adopt  the  Green- Lagrange  axial  strain,  defined  as 


e  =  Cl  = 


dti 


OX 


(If)’* 


{  Y 

\dx) 


+ 


'r 

T 

\3i\ 

\9i] 

T 

0 

0 

0 

< 

+  H 

92 

0  1  0 

i 

92 

0 

1^3  J 

ii?3  J 

0 

0 

L _ 

Us  . 

=  S'!  + 1(51  +  S'!  +  93) 


=  h^g+ig^Hg. 


(31) 


Thus  for  this  choice  of  strain,  =  [1  0  0]  and  H  is  the  3x3  identity  matrix. 
The  conjugate  stress  measure  si  =  s  is  the  second  Piola-Kirchhoff  (PK2)  axial  stress. 
The  stress-strain  relation  is  s  =  s°  -f-  Ee,  where  and  s  are  PK2  axial  stresses  in  the 
reference  and  current  configurations,  respectively,  and  E  is  Young’s  modulus. 


Since  H  is  independent  of  g,  to  form  the  core  stiffnesses  in  loceii  coordinates  we  can  use 
the  spectral  expressions  of  Section  4.  First  construct  the  vectors 


0 

III 

n 

il 

-  - - 

\92 

cr 

III 

o* 

II 

^  1  +  1 

\  29i 

i  93  J 

.  (32) 


which  inserted  into  (21),  (23)  and  (24)  jdeld 


S^(l,l)  =  £?cc^  +  4“H=:i; 


(1  +  J5i)*  +  a^i)  5-53(1  +  j^i) 


S’'(i  l)=£;cc^  +  3"*H  =  f; 


symm  jgi 

(1  +  ^51)’  55a(l  +  ^51)  ^53(1  +  j5i) 
12  1 

T52  75253 

symm 

■(1  +  51)^  52(1  +  51)  53(1+51)1 


5-5253  +  3  0  1  0  , 


1  0  0 


0  0  1 


'1 

0 

O' 

+3’" 

0 

1 

0 

.0 

0 

1. 

S  =  £bb^  +  sn  =  E 


symm 


.it-5i;  n  0  O' 

5253  +  3  0  1  0  .  (35) 

.0  0  1. 


where  s"*  =  5(3°  +3).  The  clean  separation  into  material  and  geometric  (initial-stress) 
stiffnesses  should  be  noted.  As  (30)  is  linear  in  v,  the  physical  stiffnesses  in  local 
coordinates  are  obtained  through  (26)  in  which  V  —  AL.  For  the  tangent  stiffness  this 
transformation  yields 


K  =  D^SD  dV  =  Y  D^(£bb^  +  sH)  D,  (36) 

Jy  L  . 

with  simileu-  expressions  for  the  other  local  stiffnesses.  Given  the  simplicity  of  D,  K  could 
easily  be  expressed  in  closed  form,  and  similarly  for  K  and  K  .  Finally,  trzmsformation 
to  displacements  ux,uy^^z  global  Cartesian  system  is  handled  in  the  usual 

manner.  If  v  =  Tv,  the  global  stiffness  matrix  is  given  by 

For  efficient  computer  implementation,  a  closed  form  for  K  is  easily  obtained  from  (37) 
by  symbolic  manipulation  and  automatically  converted  to  program  statements. 


8  Example  2:  iV-Node  Plane  Stress  Element  (n^  =  2,  n«  =  3,  Ug  —  4) 

As  second  Sample  we  consider  an  arbitrary  iV-node  isoparametric  element  that  models  a 
plane  stress  problem.  The  Cartesian  reference  system  and  displacement  components  will 
be  denoted  by  {X,Y),  (®>y)  («X»«y)  rather  than  {Xi,X2),  (ri,®?)  and  (ui,U2), 

respectively.  The  element  nodes  are  located  at  (n  =  1,  ...  N)  in  the  reference 

configuration  and  move  to  (xn  =  X„  +  «xni  !/n  =  +  ^Yn),  (n  =  1,  . . .  iV)  in  the 
current  configuration. 


The  element  displacement  field  is  expressed  as 


{::}■ 


Pi  0  Pi  ...  0 
0  Pi  0  ...  Pjq 


vxi 

VY\ 

VX2  =  Pv, 


where  Pn(^)^)  are  the  appropriate  isoparametric  shape  functions.  In  this  case  four 
displacement  gradients  appear,  and  these  are  arranged  as 

(9i]  f  dux/dX  ] 

U4  J  I  duy/dY  ) 

where  G  is  a  sparse  4  x  2N  matrix  that  contains  the  shape  function  derivatives  dPn/dX 
and  dPnfdY.  The  strain  measures  chosen  are  the  three  components  (i  =  1,2,3)  of 
the  Green-Lagrange  strains  defined  in  the  usual  manner 


Cl  =  exx  -9i  +  \i9i  +  52)  =  j  0  '  ®  2® 

0  . 


'1  0  0  O' 

1  7*  0  1  0  0 

2®  0  0  0  0 

0  0  0  0 


.1/2,  2\  .iT-ouuu 

a  =  eyy  =  54  +  ^{9z  +  )  =  <  g  f  8  +  g  0  1  0  ® 


’0  0  0  O' 

1  7*  0  0  0  0 


0  0  0  1 


T 

'0 

0 

1 

o' 

,  1  T 

0 

0 

0 

1 

*  g+5g 

1 

0 

0 

0 

.0 

1 

0 

0 

g,  (42) 


from  which  expressions  for  hi  and  Hi  (t  =  1, 2, 3)  follow.  For  brevity,  only  the  derivation 
of  the  tangent  stiffness  matrix  will  be  described.  Begin  by  forming  the  vectors 


bi  = 


1+^1 

92 

0 

0 


b,  = 


0 

0 

93 

1  +  flf4 


f  ] 


Then  from  (24)  we  get  the  core  stiffness 

S  =  Eijhihf  +  3iHi  =  Sjvf  +  So, 


where  Si  =  s®  +  EijCj,  {i^j  —  1,2,3),  sure  the  PK2  stresses  in  the  current  configuration. 
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In  full  and  denoting  oi  =  1  +  flri  and  <x<  =  1  +  g^: 


r  Eital  +  £^1301^3  +  Eaagl 


Sjif  = 


Eixatga  +  J?i3(oi04  +st2jf3)  +  £3304(73 
Eugl  +  £1304^^3  +  •E33fl4 


symm 


£130193  +  Eizttl  +  Eaag^  +  £330193 

Engage  +  Eiaaiga  +  £330493  +  £330104 
■^3393  +  -^330193  +  Eaaal 


£130104  +  £130193  +  £330493  +  Eaagaga 
£130493  +  £1393  +  £3304  +  Easa^ga 
£330493  +  £33(0104  +  29393)  +  £330193 

£3304  +  £330493  +  £339* 


Si 

0 

S3 

0  ■ 

Sg  = 

Si 

0 

S7 

S3 

0 

symm 

^2. 

The  physical  tangent  stiffness  is 


(46) 


K  =  /  G'^(Su  +  So)GdV, 
Jv 


(47) 


which  is  conveniently  evaluated  by  numerical  integration.  Since  several  integrand  ma¬ 
trices  are  quite  sparse,  for  efficiency  in  the  computer  implementation  the  integrand 
should  be  evaluated  symbolically  and  converted  to  program  statements  before  being 
encapsulated  in  the  Gauss  quadrature  loop. 

9  Example  3:  3D  Timoshenko  Beam  (n^  =  3,  =  3,  rig  =  9) 


As  final  CCF  application  we  describe  the  derivation  of  a  new  TL  Timoshenko  beam 
element  capable  of  undergoing  arbitrarily  large  rotations  in  three  dimensions.  Only  a 
brief  outline  of  the  derivation  is  given;  full  details  may  be  found  in  Crivelli’s  thesis  [5]. 

The  beam  kinematics  is  based  on  two  assumptions:  (1)  the  TL  description,  and  (2)  the 
Timoshenko  beam  hypothesis:  planes  sections  remain  plane  although  not  necessarily 
normal  to  the  deformed  longitudinal  axis.  The  beam  is  assiuned  isotropically  elastic, 
with  Young’s  modulus  E  and  shear  modffius  G  =  lE/{l  +  u).  The  reference  configura¬ 
tion  of  the  beam  is  straight,  prismatic  and  stress  free,  with  cross  section  A  and  length  L. 
A  local  reference  frame  n,*  is  defined  on  it,  with  ni  directed  along  the  longitudinal  axis 
(locus  of  cross  section  centroids).  Vectors  na  and  ns  are  in  the  plane  of  the  left-end  cross 
section;  these  are  eventually  aligned  with  principal  inertia  axes  to  simplify  some  expres¬ 
sions.  Along  these  vectors  we  attach  the  reference  coordinate  system  {Xi,X2jX3).  We 
further  define  a  set  of  moving  frames,  denoted  by  ai,  &2  ^d  as,  parametrized  by  the 
longitudinal  coordinate  These  frames  displace  rigidly  attached  to  the  beam  cross 
sections  as  shown  in  Figure  1. 
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Fig.  1:  Reference  frames  describing  beam  kinematics. 


A  beam  particle  originally  at  (JCi,X2,X3)  displaces  to 

x(X)  =  xo(X,)  +  R’'{A-.)«X„X3)  (48) 

where  Xo  is  the  position  of  the  cross  section  centroid,  R  is  a  3-by-3  orthogonal  matrix 
function  that  orients  the  displaced  cross  section,  zmd  C  is  the  cross-section  coordinate 
system  given  by  =  [0  X2  ^3  ].  The  displacement  field  is 

u  =  x-X  =  Uo  +  (R^-I)C,  (49) 

where  Uo(A’i)  =  Xo(A’i)  —  Xo(A’i).  The  skew-symmetric  ciurvature  matrix  is  defined 
as  /c  =  R  The  curvature  vector  k  is  the  3- vector  extracted  from  k  as 

K  =  axial  (k).  The  finite  streuns  that  contribute  to  the  iixternal  energy  are  the  axial 
strain  cn  and  the  two  shear  strains  '>'12  713: 

cn  =  h^gi  +  jgfHgi, 

712  =  2ci2  -h^gi  +  +  hJ’gj  +  5gfHg2,  (50) 

713  =  2ei3  =  hjgi  -f  IgjHgi  +  fafga  -f-  |gJ’Hg3. 

Here  the  3  x  3  matrix  H  depends  on  the  strain  measured  selected  (for  Green- Lagrange 
strains,  H  =  I)  and  g,-  are  the  displacement  gradient  3-vectors 

gi  =  gj  -  (R^  “  I)  h2,  g3  =  (R^  - 1)  ha*  (51) 

in  which  hy  denotes  the  3-ve<;tor  whose  component  is  1  and  the  other  two  are  zero. 


Introducing  the  angular  distortion  vector  ^  and  its  associated  skew-symmetric  matrix 
0  as  • 

<!>  =  Rbo,  bo  =  hi  -f  0  =  axial  (^),  (52) 

we  can  further  split  the  strains  as 


712  =  h5’<^H-hJ’C‘'K.  7i3  =  hJ’i^+ha’C'' 

(53) 


where  cq  =  hi  -f  K^uo/SA'i).  Here  cj  and  c/  measure  mean  (bar-like)  and  flexural 
normal  deformations.  The  two  transverse  shear  strains  are  72  =  hj<^  and  73  s=  hj^ <f>, 
while  the  torsional  shear  strain  is  composed  of  the  terms  h2C  h^C 


The  strain  energy  stored  in  the  current  configuration  is 

U=^  J J  UdAdXu  with  W  =  Bs?,+,iG(yfj+7y  ,  (54) 


where  /i  is  a  shear  correction  factor.^®  The  9x9  core  stiffnesses  axe  expressed  in  terms 
of  the  the  9-component  gradient  vector  =  (gf  gj  gf).  Defining  c,-  =  h,-  -f  |Hgj 
and  b,-  =  h,-  -f  Hg^  for  i  =  1, 2, 3,  and  applying  the  formulas  of  Section  4  we  obtain  for 
the  spectral  form  at  the  energy  level 


rBSi'  +  ,iC(S^  +  S?)  f^GSi'  /iGSh 


S‘'  = 


MGsf 

pGS,"^ 


f‘GS} 

0 


U 


0 


/iGSf  J 


(55) 


where  Sf  =  Cicf ,  Sj  =  C2C^,  =  cacf’,  =  C2cf  and  =  cscf.  At  the  residual 

level  we  obtain  for  the  spectral  form  S’"  =  S’’(0, 0) 


S’  = 


Es^,  +  f.'G(,s;  +  si)  iaGsi  fiGs; 
fiGS;  fxGSl  0 

/iGS?  0  nGS[ 


(56) 


where  S[  =  bicj’,  SJ  =  bjcf,  SJ  =  bac^,  SJ  =  b2cf,  SJ  =  bac^,  Sg  =  bicf’  and 
Sy  =  bicj^.  The  internal  force  vector  conjugate  to  5g  is  $  =  S’’g  =  in  which 


f  biCii 

^  ^2712  +  b37i3  ' 

•01 

II 

o 

s  ^r  =  fiG< 

1  bi7i2  ► 

l  0  J 

1  bi7i3 

represent  the  contnbution  of  the  normal  and  shear  stresses,  respectively. 


(57) 


This  factor  is  initially  assumed  to  be  the  same  for  bending-shear  and  torsion  for  simplicity 
in  the  foregoing  expressions.  Distinction  can  be  made  if  necessary  after  passing  to  stress 
resultants  in  the  over-the-element  int^ration  process. 
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At  the  incremental  level  we  operate  with  the  second  variation  (15).  Terms  5g  + 
Sg^SS^g  provide  two  components  of  the  core  tangent  stiffioess:  Sm  and  Sqi,  which 
are  independent  of  the  choice  of  element  degrees  of  freedom.  On  the  other  hand,  the 
term  which  has  to  be  retained  because  the  relation  between  g  and  rotational 

degrees  of  freedom  is  nonlinear,  leads  to  a  geometric  stiffness  component  SgD)  which 
depends  on  the  parametrizatioL  chosen  to  describe  rotations  (for  example,  Euler  angles 
or  Euler  parameters). 

The  core  material  stiffness  matrix  is 

ESi  +  fiG{S2  +  S3)  fiGSi  /iGSs 

SAf  =  tiGSl  /iGSi  0  ,  (58) 

nGSi  0  (iGSi . 

where  Si  =  bibf,  Sj  ==  bjb^,  S3  =  bsb^,  S4  =  b2bf  and  S5  =  bsbf.  The 
parametrization-independent  geometric  stiffness  is 

EciiH  /iG'yijH 

Sg/  =  /^G'7i2H  0  0  .  (59) 

./^G’7i3H  0  0 

The  computation  of  Sqd  depends  on  the  rotation  parametrization;  we  refer  to  [5]  for 
details.  The  core  tangent  stiffness  matrix  is  the  combination  S  =  S^f  +  Sqi  +  Sgd> 
Completion  of  the  element  derivation  require  the  following  transformation  steps,  which 
are  only  outlined  for  brevity. 


The  variations  Sg  are  related  to  variations  of  a  vector  q  of  generalized  coordinates: 


Sg  = 


0  0 


h. 


[fe 

in  which  =  <  d8@ 
aXi 


where  I  is  the  3x3  identity  matrix  and  5©  is  the  todal  vector  associated  with  the 
skew-symmetric  matrix  ^0  =  R5R  . 


2.  The  variations  of  q  are  related  to  variatior'?  of  nodal  degrees  of  freedom  v  of  the 
beam  element.  Euler  parameters  are  chosen  as  rotational  parameters  and  related 
to  angular  coordinates.  As  usual  for  Timoshenko  beam  elements,  translational  dis¬ 
placements  are  linearly  interpolated.  For  the  rotations,  however,  the  shape  func¬ 
tions  contain  trigonometric  terms  so  that  constant  curvature  states  can  be  exactly 
represented  for  arbitrary  node  rotations.  The  physical  stiffnesses  are  obtained  by 
the  method  explained  in  Section  6.  Finally,  integrated  stress-resultant  expressions 
are  simplified  by  introducing  principal  and  polar  moments  of  inertia. 


Procedural  details  pertaining  to  these  two  steps  are  given  in  [5].  Two  highly  nonlinear 
problems  solved  with  this  formulation  are  reported  below. 
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(29.S,  70.7,  O.Ch 


Fig.  2:  Curved  cantilever  bend  under  tip  load:  Problem  definition. 


Fig.  3:  Curved  cantilever  bend  under  tip  load:  Deflected  shapes. 

10  Application  Problem  1:  Large  Displacement  of  a  45**  Cantilever  Bend 

The  first  problem  concerns  the  lar«Te  displacement  analysis  of  a  45®  cantilever  bend 
initially  lying  on  the  horizontal  {X,Y)  plane.  The  bend  is  an  arc  of  a  circle  of  radius 
r  =  100  and  the  beam  cross-section  is  a  square  with  sides  of  unit  length.  The  beam  has 
modulus  E  =  10^  and  Poisson’s  ratio  u  =  0.  It  is  subjected  to  an  end  load  P  =  600 
normal  to  the  {X,  Y)  plane  as  shown  in  Figtire  2.  The  model  consists  of  8  straight  beam 
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elements,  and  the  full  load  was  applied  in  6  equal  increments.  The  solution  method  is 
incremental-iterative  with  full  Newton  iteration  used  in  the  corrective  phase. 

This  problem  was  treated  by  Bathe  and  Bolourchi  [7]  with  3D  brick  elements,  and 
subsequently  by  Simo  and  Vu-Quoc  [8]  and  Cardona  [9]  with  beam  elements  based  on 
other  formulations.  Results  for  the  3  tip  displacement  components  are  compared  below. 


Bathe  etal.  [7] 
Simo  etal.  [8] 
Cardona  [9] 
Present 


Load  P  =  300 
22.33,  58.84,  40.08 
22.50,  59.20,  39.50 
22.14,  58.64,  40.35 
22.31,  58.85,  40.08 


Load  P  =  450 
18.62,  53.32,  48.39 

18.38,  52.11,  48.59 
18.59,  53.34,  48.39 


Load  P  =  600 
15.79,  47.23,  53.37 
15.90,  47.20,  53.40 
15.55,  47.04,  53.50 
15.75,  47.25,  53.37 


As  can  be  observed  the  present  results  compare  well  with  those  obtained  with  3D  ele¬ 
ments  in  [7].  Deflected  shapes  for  selected  load  levels  are  shown  in  Figure  3. 


Length 

Polar  Moment 
Second  Moments 
Young’s  Modulus 
Shear  Modulus 


L  *  240  mm 

lx  *  2.16  mm!* 

h  *  Iz  »  0.0833  mm* 


E 

G 


71240  Nlmm^ 
27190  Nlmrn^ 


Fig.  4:  Cable  hockling:  Problem  definition. 


11  Application  Problem  2:  Cable  Heckling 

The  second  problem,  cable  hockling,  is  more  computationally  demanding.  An  initially 
straight  cable,  modelled  as  a  beam,  is  subjected  to  a  tip  torsional  moment.  The  geome¬ 
try  and  physical  properties  are  given  in  Figure  4.  The  cable  is  clamped  at  one  end  and 
supported  at  the  other  so  that  the  only  motions  allowed  at  that  point  are  axial  displace¬ 
ment  and  torsional  rotation  about  the  longitudined  X  axis.  No  rotation  is  allowed  about 
Y  ot  Z.  The  purpose  of  these  restrictions  is  to  keep  the  problem  conservative,  because 


Fig.  5:  Cable  hockling:  deformed  shapes  at  different  load  levels: 

a)  After  bifurcation,  b)  Af,  =  50,  c)  M*  =  0,  J)  M,  =  —50, 
e)  At  the  limit  point,  f)  =  0. 


if  the  torque  is  allowed  to  rotate  about  Y  or  Z,  the  problem  becomes  nonconservative 
and  dynamical  methods  are  required  to  assess  its  stability  [10,11]. 

This  problem  has  received  a  great  deal  of  attention  from  the  engineering  comravmity 
due  to  its  practical  importance.  The  main  objective  is  to  estimate  the  critical  applied 
torque  ut  which  the  cable  departs  (bifurcates)  from  its  straight  configuration,  resulting 
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in  the  formation  of  a  loop  or  hockle.  This  has  direct  application  to  marine  cables  used 
in  tasks  such  as  lifting  objects  from  the  ocean  floor,  for  which  structural  failure  could 
be  disastrous.  Under  the  assumptions  of  inflhitesimal  bending  deformations,  Greenhill 
obtained  an  analytical  formula  to  predict  the  critical  torque;  see  t.g.  pp.  417-418  of 
Love  [12].  The  post-bifurcation  response  analysis  of  this  problem,  however,  has  not 
been  pursued  until  recently,  as  discussed  in  the  research  conducted  by  Nour-Omid  and 
Rankin  [13].  This  postcritical  response  has  also  been  analyzed  by  using  the  present  TL 
formulation.  The  structure  is  discretized  by  twenty  equally-spaced  beam  elements. 


Twi^  Angle,  radians 

Fig.  6:  Cable  hockling:  Tip  rotation  vs.  applied  moment. 


The  deformed  shapes  at  different  load  levels  are  shown  in  Figure  5,  which  displays  the 
loop-formation  process  previously  mentioned.  The  curves  on  the  left  and  right  side  show 
deformed  shapes  looking  along  the  Y  and  Z  axes,  respectively. 

If  the  torque  is  held  under  the  critical  value,  the  beam  twists  without  lateral  deflection. 
Along  this  fundamental  path  the  response  is  linear.  At  the  critical  torque  a  bifurcation 
point  is  reached,  at  which  the  fundamental  path  becomes  unstable.  The  beam  acquires  a 
helical  shape  with  the  free  end  moving  towards  the  clamped  end.  This  new  equilibrium 
branch  is  \mstable  and  the  cable  undergoes  large  displacements  and  rotations  as  the 
moment  decreases.  The  unloading  process  continues  until  reaching  a  sharp  limit  point 
which  corresponds  to  a  negative  value  of  the  applied  torque  (it  should  be  mentioned  that 
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Nour-Omid  and  Rankin  [13],  who  use  a  Hennitian  beam  element  based  on  corotational 
description,  characterize  this  critical  point  as  a  secondary  bifurcation;  evidence  for  cat¬ 
egorization  is  presently  inconclusive).  After  traversing  this  point,  the  torque  reverses 
again  until  the  cable  reaches  a  circular-shaped  unloaded  deformed  configuration. 

The  computed  variation  of  the  twist  angle  at  the  moving  end  versus  the  applied  torque 
is  given  in  Figure  6.  Results  are  compared  to  those  given  by  Nour-Oxnid  and  Rankin. 
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Addendum 


This  Addendum  contains  the  text  of  References  [1]  and  [4].  As  noted  in 
the  paper,  these  are  historically  important  in  the  staged  development  of 
the  core-congruential  formulation. 
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Partitioned  Solution  Procedure  for  Control-Structure 
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A  partitioiM<l  conpaUdoa*!  procriiiw  it  pntMtttd  for  Ikt  tfanoladoa  of  coatrol-ttnctort  tatcractioa  syttcmt  by 
oapioyiiig  dmo  nodular  softwara  packaftt:  a  ncoad  ordtr  Mroctwal  dynamics  analyser,  a  Mcaad>ordcr  obserwr 
module,  and  a  lirst-order  subilistd  aetire  control  force  (tnerator.  Tbit  paper  focatet  on  modnlar  proframming  of 
the  procedure,  tecbnii|uet  for  enhancing  accuracy  and  for  stabilising  the  parttioiied  interactioa  equadont,  and  time 
discretisation  of  tbe  stabilised  systems  of  aquadoot.  A  stability  analysit  bat  been  performed  utiiig  a  set  of  model 
interacdoo  equadont,  which  bidicatet  that  dw  computadonal  stability  of  die  proceifaire  it  governed  by  the  highest 
frequency  of  the  controller  and  tbe  strength  of  Its  position  feedback  paramct'cr  and  not  by  that  of  the  structural 
system.  Conparitoo  of  the  computadonai  eAdency  of  the  present  procedure  with  a  flrst*«tder  cooveodonai  soiutkio 
procedure  inmates  that  the  present  procedure  offers  a  subetandal  efBcicncy  improvement.  The  effectiveness  of  the 
present  procedure  hat  been  demonstrated  by  several  example  problems. 


I.  Introduction 

EALISTIC  analysis  of  active  control-structure  inter¬ 
action  (CSI)  problems  poses  a  formidable  challenge  both 
to  the  dynamist  and  the  control  scientist.  The  'imerging  need 
for  real-time  simulation  and  control  of  CSI  systems  will 
engender  a  new  activity  called  “computational  controls”  to 
meet  this  challenge.  The  prevailing  practice  in  CSI  simulations 
is  by  and  large  limited  to  a  reduc^-order  moUv'  i  of  structures 
based  on  modal  representations  together  with  a  limited  num¬ 
ber  of  sensors  and  actuators.  Specifically,  the  control  laws 
are  expressed  in  terms  of  the  generalized  coordinates  and  their 
time  denvatives,  which  are  computed  using  state  estimators  if 
full  state  feedback  control  is  used.  The  resulting  closed-loop 
system  equations  are  usually  cast  in  first-order  form;  this  has 
been  the  prevailing  practice  since  modem  control  theory  has 
been  almost  exclusively  developed  for  the  first-order  form.^"'® 
Typically,  simulation  tasks  for  CSI  problems  involve  sev¬ 
eral  computational  elements  and  discipline-oriented  models 
such  as  structural  dynamics,  control  law  synthesis,  state  esti¬ 
mation,  actuator  and  sensor  dynamics,  thermal  analysis,  liq¬ 
uid  sloshing  and  swirling,  environmental  disturbances,  and 
maneuvering  thrusts  and  torques.  Because  each  of  these  com¬ 
putational  elements  can  be  large,  it  is  usually  not  piactical  to 
assemble  these  computational  elements  into  a  single  set  of 
equations  of  motion  and  perform  the  analysis  in  its  totality, 
which  will  be  referred  to  as  the  “simultaneous  solution  ap¬ 
proach.”  First,  the  equation  size  of  the  total  system  can  be 
simply  too  large  for  many  existing  computers.  Second,  the 
solution  of  the  coupled  interaction  equations  may  destroy  the 
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sparsity  of  the  attendant  matrices,  thus  requiring  excessive 
computations  and  storage*  space.  Most  important  of  all,  any 
changes  in  the  model  or  in  the  computational  procedures  will 
affect  many  of  the  required  analysis  software  modules  and 
hence  require  a  painstaking  software  verification  effort. 

The  computational  procedure  that  is  described  in  the 
present  paper  has  been  motivated  to  alleviate  the  aforemen¬ 
tioned  difficulties  that  exist  in  the  simultaneous  solution  ap¬ 
proach.  First,  software  development  of  any  new  capability  is 
costly  and  time  consuming;  thus,  if  at  all  possible,  it  is 
preferable  to  use  existing  single-field  analysis  modules  to 
conduct  the  coupled-field  interaction  analysis.  Second,  the 
tasks  for  model  generation  and  methods  development  of  each 
field  are  best  accomplished  by  relying  on  the  experts  of  each 
single-field  discipline.  To  accommodate  both  the  software 
considerations  and  the  single-field  expertise,  a  partitioned  (or 
divide-and-conquer)  analysis  procedure  is  proposed  for  con¬ 
trol-structure  interaction  a,,  tlysis  for  direct  output  feedback 
systems. The  procedure  abandons  the  conventional  way  of 
treating  the  CSI  problems  as  one  entity.  Instead,  it  treats  the 
structure  (or  plant),  the  observer,  and  the  controller/observer 
interaction  terms  as  separate  entities.  Thus,  the  CSI  problem 
is  recognized  as  a  coupled-field  problem,  and  a  divide-and- 
conquer  strategy  is  adopted  for  the  development  of  a  real¬ 
time  compuutional  procedure.  A  simular  concept  has  been 
successfully  applied  to  other  interaction  analyses  such  as 
fluid-structure  interactions, multistructural  interaction  sys¬ 
tems,'*  Earth  dam  and  pore-fluid  interactions,'^  and  multi¬ 
body  systems  with  constraints.'* 

The  proposed  partitioned  analysis  procedure  hinges  on 
three  software  and  computational  aspects.  First,  because 
large-scale  simulation  of  interdisciplinary  problems  must  rely 
on  an  efficient  and  versatile  data  management  system,  the 
data  manager  is  used  to  handle  the  necessary  interprocessor 
communications  among  the  single-discipline  analysis  modules. 
Second,  at  each  discrete  time  increment,  the  equations  of 
motion  for  each  discipline  are  solved  separately  by  consider¬ 
ing  the  interaction  terms  as  external  disturbances  or  applied 
forces.  Third,  when  necessary,  computational  stabilization 
and  accuracy  improvements  are  introduced  through  augmen¬ 
tations  and/or  equation  modifications.  It  is  important  to  note 
that  such  partitioned  solutions  of  each  discipline  equations 
can  be  carried  out  either  on  a  sequential  or  parallel  machine 
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if  certain  message  passing  and  memory-conflict  issues  a;« 
handled  appropriately. 

Recently,  the  computational  need  and  the  physical  insight 
that  can  accrued  from  the  second-order  dynamic  equations 
have  motivated  several  investigators  in  the  control  community 
to  address  the  second-order  state  estimation  and  control  law 
issues.  They  include  the  analysis  of  the  second-order  system 
equations’’  '*  and  CSI  design,”’’*  among  others. 

The  objective  of  the  paper  is  thus  to  describe  the  algorith¬ 
mic  nature  of  the  partitioned  CSI  solution  procedure,  its 
implementation  aspects  and  computational  stability  and  accu¬ 
racy  characteristics.  To  this  end,  the  paper  is  organized  as 
follows.  The  discrete  equations  of  motion  for  CSI  problems 
are  presented  in  Sec.  II,  which  includes  the  discrete  equations 
of  motion  for  structures  subjected  to  control  forces,  an  ob¬ 
server  model,  and  a  general  control  law. 

A  review  of  a  conventional  flrst-order-based  solution  proce¬ 
dure  is  presented  in  Sec.  Ill,  which  is  termed  herein  simulta¬ 
neous  solution  procedure  to  contrast  with  the  proposed 
partitioned  procedure.  Section  FV  introduces  a  parabolic  sta¬ 
bilization  in  order  to  derive  a  differential  equation  for  the 
interaction  terms  (i.e.,  the  control  force  and  the  state  estima¬ 
tion  error  term)  so  that  the  interaction  terms  are  obtained  by 
solving  differential  equations  rather  than  by  back  substitu¬ 
tions.  It  turns  out  that  such  a  stabilization  (or  an  equation 
augmentation)  improves  not  only  computational  stability  but 
numerical  accuracy  as  well. 

Time  discretization  of  the  coupled  CSI  equations  is  carried 
out  in  Sec.  V  by  employing  the  implicit  midpoint  formula  (or 
the  trapezoidal  rule).  It  is  shown  that  a  general  canonical 
form  of  the  equations  of  motion  for  structures  and  the 
second-order  form  of  state  estimators  leads  to  a  computation¬ 
ally  attractive  discretization.  A  computational  stability  analy¬ 
sis  of  the  present  partitioned  CSI  solution  procedure  is 
elaborated  in  Sec.  VI,  which  indicates  that  the  stability  of  the 
present  partitioned  procedure  is  governed  by  the  highest 
frequency  of  the  control  force  and  its  position  feedback 
strength  parameter  irrespective  of  the  frequency  magnitude  of 
the  structural  system. 

The  computational  efficiency  of  the  present  procedure  is 
compared'  with  the  conventional  procedure  in  Sec.  VII.  It  is 
shown  that  the  present  procedure  offers  a  substantial 
efficiency  improvement  over  the  conventional  procedure  for 
most  p.’-actical  CSI  problems.  Applications  of  the  present 
procedure  are  given  by  way  of  several  example  analyses; 
results  are  offered  in  Sec.  VIII.  Finally,  concluding  remarks 
and  further  remaining  challenges  toward  making  the  real-time 
CSI  analysis  and  simulations  a  routine  practice  are  discussed 
in  Sec.  IX. 


II.  Equations  of  Motion  for  Control-Structure 
Interaction  Systems 

A  typical  control-structure  interaction  system  can  be  repre¬ 
sented  as  shown  in  Fig.  1  (see,  e.g.,  Kwakemaak  and  Sivan’). 
The  discrete  equations  of  motion  for  control-structure  inter¬ 
action  systems  may  be  described  by 

Structure: 


Mq  -i-  Dq  +  Kq  =/  +  Bu  +  Gw 


<l(0)=qo,  4(0)  =  qo 


Sensor  output: 


ffx  +  v 


Estimator: 


(la) 


(lb) 

(lc) 


Control  force: 


u  =  —Fx  (Id) 

Estimation  error; 

y=z-(H,q  +  H,q)  (le) 

where 


and 

«.i«,  «.i,  i.[y. 

" -m'-J-  "“[m-'J 

In  the  preceding  equations,  M  is  the  mass  matrix,  D  is  the 
damping  matrix,  K  is  the  stiffness  matrix,  /(/)  is  the  applied 
force,  B  is  the  actuator  location  matrix,  G  is  the  disturbance 
location  matrix,  q  is  the  generalized  displacement  vector,  w  is 
a  disturbance  vector,  and  the  superscript  dot  denotes  time 
differentiation.  In  Eq.  (lb),  z  is  the  measured  sensor  output. 
The  matrix  is  the  matrix  of  displacement  sensor  locations 
and  is  the  matrix  of  velocity ‘sensor  locations.  The  vector 
»  is  measurement  noise.  The  state  estimator  in  Eq.  (Ic)  is 
assumed  either  to  be  based  on  the  Kalman  filter’*  or  based 
on  a  Luenberger  observer”  if  the  system  is  deterministic  The 
supcrscipt  ~  denotes  the  estimated  states.  The  actuatoj  output 
« is  a  function  of  the  state  estimator  variables  q  and  q,  and  F, 
and  F;  are  control  gains  determined  for  example  by  pole-zero 
placement  or  from  the  solution  of  an  optimal  control  prob¬ 
lem.  The  observer  is  governed  by  L,  the  filter  gain  matrix.  For 
the  special  case  where  L,  is  the  null  matrix  (i.e.,  q==q),  a 
second-order  state  estimator  can  be  expressed  as 

Mq  +  Dq  +  Kq  =f  +  Bo  +  ML^y  (2) 

The  effect  of  the  preceding  simplification  on  the  observer 
stability  and  convergence  is  discussed  in  detail  in  Refs.  26  and 
28. 


III.  Simultaneous  Solution  Approach 

It  should  be  emphasized  that  the  objective  of  this  paper  is 
to  directly  solve  the  coupled  equations  given  in  Eqs.  (I)  in 
their  natural  forms.  That  is,  to  exploit  the  second-order  form 
of  the  structure  equation  (and  also  the  observer  equation  if 
L^  =  0).  To  justify  this  objective,  the  simultaneous  solution 
approach  for  numerical  simulation  of  Eq.  (1)  is  examined 
first. 


X  =*  Ax  +  Ef  +  Bu  +  Ly,  i(0)»0 


Fig.  1  Typical  control/structure  interaefion  system. 
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The  numerical  solution  of  Eqs.  (1)  by  the  simultaneous 
solution  approach  begins  with  appropriate  initial  conditions: 
the  feedback  gain  F  and  the  filter  gain  L.  The  structure 
equation  is  written  in  first-order  form 

x-Ax-^Ef+Bu-¥Gw  (3) 

where 


The  control  gains  and  observer  gains  can  be  synthesized 
independently  by  noting  that  the  stability  of  the  structural 
system  and  the  observer  error  stability  are  uncoupled.  Intro¬ 
ducing  the  error  equation  by  the  deterministic  form  of  Eqs, 
(1)  as 


interaction  systems  using  the  proposed  partitioned  solution 
procedure  to  be  described  can  be  carried  out  by  a  judicious 
employment  of  three  software  modules;  the  structural  ana¬ 
lyzer  to  obtain  q,  the  state  estimator  to  obtain  q,  and  the 
solver  for  the  control  force  u  and  the  state  estimation  error  y 
as  indicated  in  Fig.  2.  Ihus,  the  partitioned  procedure  be¬ 
comes  computationally  efficient  and  can  preserve  software 
modularity  by  exploiting  the  symmetric  matrix  form  in  the 
left-hand  sides  of  Eqs.  (la)  and  (Ic). 

However,  computations  of  the  control  force  u  and  the  state 
estimation  error  y  by  Eqs.  ( Id)  and  ( le),  respectively,  can  lead 
not  only  to  an  accumulation  of  errors  but  often  can  give  rise 
to  numerical  instability.  Hence,  to  make  the  proposed  parti¬ 
tioned  solution  procedure  robust,  it  is  imperative  to  stabilize 
the  partitioned  solution  process  and/or  numerically  to  filter 
the  solution  errors  in  computing  u  and  y.  This  is  addressed  in 
the  next  section. 


The  stability  of  Eq.  (5)  is  governed  by  the  stability  of 
[A  -  SF]  and  [A  -  LH],  Thus,  the  control  gain  F  is  suitably 
chosen  from  the  matrix  [A  —  SF]  and  the  observer  gain  L 
from  the  matrix  [.4  —  LH\. 

Subsequently,  the  simultaneous  solution  approach  elimi¬ 
nates  u  and  z  from  Eqs.  (la)  and  (Ic)  and- then  solves  the 
observer-oased  closed-loop  equations: 


'A  -SF  Ifx) 


w 


(6) 


The  embedding  effects  of  both  the  controller  and  the  state 
observer  result  in  an  unsymmetric  and  nonsparse  system 
matnx  of  dimension  (4/V  x  4N),  where  N  is  the  number  of 
structural  degrees  of  freedom.  Solution  of  Eq.  (6)  would 
require  considerable  software  modification  of  existing  struc¬ 
tural  dynamics  analysis  programs  for  large-scale  CSI  simula¬ 
tion  purposes.  In  addition  to  losing  the  computational 
advantages  associated  with  the  finite  element  based  CSI  equa¬ 
tion,  the  simultaneous  solution  approach  requires  the  control 
law  to  be  embedded  into  the  observer  model.  If  the  control 
law  includes  actuator,  sensor,  and/or  controller  dynamics, 
additional  states  must  be  added  to  the  observer.  This  greatiy 
complicates  the  observer  model  and  requires  stgnific,'nt  soft¬ 
ware  development  for  each  class  of  control  law  dynamics.  The 
difficulties  associated  with  the  simultaneous  solution  approach 
have  prompted  development  of  a  partitioned  solution  ap¬ 
proach  for  the  CSI  equations  as  desenbed  in  the  next  section. 


IV.  Partitioned  Solution  Procedure 

To  mitigate  the  software  and  algorithmic  difficulties  associ¬ 
ated  with  the  asymmetric  embedding  of  the  controller  and  the 
state  observer  into  the  closed-loop  equations  as  discussed  in 
the  previous  section,  a  preliminary  partitioned  solution  proce¬ 
dure'^  was  proposed  for  the  solution  of  direct  output  feed¬ 
back  systems,  but  no  stability  analysis  was  offered  therein. 
The  present  exposition  extends  the  basic  concepts  offered  in 
Ref.  12  to  include  the  case  of  dynamic  compensators  in  a 
form  of  computationally  advantageous  second-order  observ¬ 
ers.  However,  for  completeness,  the  first-order  observer  solu¬ 
tion  procedure  is  included  in  the  Appendix. 

In  essence,  the  proposed  partitioned  solution  procedure 
numerically  integrates  the  structural  equations  of  motion  (la) 
and  the  observer  equation  ( Ic)  by  treating  the  control  force  u 
and  the  estimation  error  y  as  if  they  are  applied  terms  in  the 
right-hand  sides.  In  this  way,  simulation  of  control-structure 


StabiUutiOD  for  Computations  of  Control  Force 
and  Estimation  Error 

To  appreciate  the  nature  of  error  accumulations  in  comput¬ 
ing  u  and  y  by  employing  Eqs.  (Id)  and  (le),  respectively,  let 
us  consider  the  following  discrete  predictors: 

-{F^q"  +  F2q'')  (7a) 

=  (7b) 

where  the  superscripts  designate  the  discrete  time  intervals, 
t"  =  nh  and  /'’+''*  =  n  -f  l/2/i  with  a  constant  stepsize  of  h. 

It  IS  observed  that  the  predicted  control  force  u"  *  will 
possess  errors  in  -  q")  and  -  q")  magnified  by 

E,  and  fj,  unless  the  control  gains  have  a  built-in  stabilizing 
filter  against  these  errors.  The  computation  of  the  estimation 
error  y"-^  ‘  -  will  have  a  similar  error  accumulation  unless  the 
filter  gam  L  is  designed  to  cope  with  the  prediction  errors. 
Among  several  possible  stabilization  strategies,  we  will  em¬ 
ploy  a  parabolic  stabilization  as  follows. 

First,  we  time  differentiate  Eq.  (Ic)  to  obtain 

u=-Fj-F.J  (8) 

Substituting  q  from  Eq.  (2)  into  the  preceding  equation,  one 
obtains 


u  +  F^M-'Bu  =  -F.(M-'p  +  L^y)  -  Fj  (9) 
where  the  generalized  rate  of  momentum  p  is-  given  by 

^  =  {f-D4-Kq)  (10) 

The  parabolic  stabilization  that  led  to  Eq.  (9)  for  comput¬ 
ing  the  control  law  is  sometimes  called  an  equation  augmenta¬ 
tion  procedure  as  it  has  not  altered  any  of  the  basic  governing 
of  Eqs.  (1)  except  one  time  differentiation  of  u  assuming  u 
exists.  However  the  assumption  is  later  removed  through 
time  discretization  as  will  be  shown  later  in  the  paper. 

It  is  noted  that  the  homogeneous  part  of  Eq.  (9)  has  the 
filtering  effect  of  the  form  (sZ-i-EjAf'E)"'  in  parb.iice  of 
classical  control  theory  where  s  is  the  Laplace  transform 
operator,  thus  achieving  the  required  stabilization.  From  the 
computational  viewpoint,  although  F2M~'B  is  in  general  a 
full  matrix,  its  size  is  relatively  small  as  the  size  of  u  is 
proportional  to  the  number  of  actuators  placed  on  the  struc¬ 
ture. 

Similarly,  for  the  observer  estimation  error  y,  one  can 
stabilize  its  computation  by  adopting  the  following  aug¬ 
mented  equation: 


y  +  H,L2y--z-H„M-'(p  +  Bu)-H,q  (11) 

Again  the  matrix  H„L2  is  in  general  not  sparse;  however  its 
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size  is  only  proportional  to  the  number  of  measurements 
output  from  the  structure. 

SuMUzcd  Parddoiied  Equadoas  and  Soludoo  ProccM 
The  adoption  of  the  second-order  observer  and  the  preced¬ 
ing  stabilization  thus  replace  Eqs.  (Ic),  (Id),  and  (le)  by  Eqs. 
(2),  (9),  and  (11),  respectively,  as  summarized  here. 

Structure: 

Mq  +  Dq  +  Kq  =/+  Bu  +  Gw 


«(0) »  ^0. 

Sensor  output: 

If 

o 

(I2a) 

z  *  /fx  -b  r 

Estimator: 

Afq  +  Dq  +  /Cq  f  +  Bu  -b  ML^y 

(12b) 

9(0)  =0, 

Control  force: 

o 

o 

(12c) 

u+FiM-'Bu=^  -Fi(M 

Estimation  error: 

~'p  +  Li'/)  -  Fiq 

(12d) 

y  +  =  z  —  HpM  ~ 

‘(p -b  flu)  - 

(12c) 

The  partitioned  solution  process  that  implements  the  pre¬ 
ceding  equation  can  be  summarized  by  the  following  steps: 

1)  Obtain  qp*''^  =  q"  -I-  Sq"  and  q^*  =  q". 

2)  Solve  for  and  from  Eqs.  (12d)  and  (12e). 

3)  Solve  for  q”*',  and  q"*'  from  Eq.  (12c). 

4)  Solve  for  q"*',  and  ‘  from  Eq.  (12a). 

5)  Increment  (n  =  n  -l- 1)  and  (time  ==  time  +  h). 

A  flowchart  describing  the  preceding  computational  steps  is 
depicted  by  Fig.  2.  These  computational  steps  are  imple¬ 
mented  into  three  modules  as  shown  in  Fig.  2.  Note  that  steps 
1-5  would  be  repeated  until  the  transient  response  simulation 
IS  complete.  (Note,  if  no  observer  is  used,  step  2  would  only 
require  calculation  of  and  step  3  would  be  omitted.) 
The  methods  for  calculating  the  control  and  observer  interac¬ 
tion  forces  difler  depending  on  the  type  of  simulation  re¬ 
quired.  This  aspect  together  with  the  time  discretization, 
prediction  of  the  state  estimation  vectors,  and  compu'ational 
details  for  implementing  the  present  partitioned  solution  pro¬ 
cedure  will  be  dealt  with  in  the  next  section. 


V.  Time  Discretization  of  Control-Structure 
Interaction  Equations 

Direct  time  integration  of  the  structural  equations  (1 2a) 
and  the  observer  equations  (12c)  can  be  performed  by  a 
variety  of  techniques.  A  theoretically  exact  solution  can  be 
obtained  using  a  matrix  exponential  approach.  However,  such 
an  approach  engenders  numerical  roundoff  when  applied  to 
large-dimensioned  problems  and  involves  fully  populated  ma¬ 
trices  that  can  significantly  limit  the  number  of  simultaneous 
equations  which  can  be  solved.  A  number  of  approximate 
techniques  for  numerical  integration  of  coupled  ordinary 
differential  equations  also  exist.  The  approximate  methods 
generally  interpolate  and/or  extrapolate  the  dynamic  states 
with  implicit  and/or  explicit  time-stepping  formulas.  By  pre¬ 
serving  the  sparsity  and  symmetry  of  the  coefficient  matrices, 
the  approximate  methods  can  be  applied  to  very  large  systems 
of  simaluneous  equations.  Thus  approximate  numerical  inte¬ 
gration  formulas  are  used  in  this  paper. 

Approximate  methods  must  be  examined  from  both  stabil¬ 
ity  and  accuracy  considerations.  Numerical  stability  of  ex¬ 
plicit  integration  formulas  require  a  step  size  inversely 


proportional  to  the  highest  frequency  of  the  system.  The  small  | 
step  size  necessary  for  explicit  integration  stability  generally  / 
satisfies  the  accuracy  requirements.  Conversely,  some  fully 
implicit  formulas  are  unconditionally  stable;  thus  the  step  size  ; 
must  be  chosen  based  on  accuracy  considerations.  Because  i 

larger  step  sizes  permit  more  efficient  solution  of  the  control-  ^ 

structure  interaction  equations,  implicit  integration  formulas 
are  employed  in  this  study. 

It  should  be  mentioned  that,  when  massively  parallel  com-  ’ 
putations  become  widely  available,  the  pro^mming  simplic-  ' 
ity  of  explicit  formulas  become  so  attractive  that  one  may 
prefer  explicit  to  implicit  formulas  for  control-structure  inter¬ 
action  simulations.  This  is  particularly  true  when  reduced-  ; 
order  models  are  used  that  filter  high-frequency  responses.  ^ 

Among  a  plethora  of  implicit  numerical  integration  formu¬ 
las,  we  employ  the  following  unconditionally  stable  midpoint 
implicit  formulas: 


+  +  5=/i/2 

(13a) 

^"+1/2- J^"+l/2 

(13b) 

-q" 

(13c) 

where  h  is  the  time-step  size.  The  selection  of  the  midpoint 
implicit  formula  (or  the  trapezoidal  rule)  for  the  present 
application  is  due  to  its  minimal  frequency  distortion  and  no 
numerical  damping  charactenstics.^*”  Experience  has  shown 
that  it  is  very  imk.-onant  to  minimize  numerical  damping  when 
studying  the  control-structure  interactions. 

Integradon  of  Stnicturil  Equations 

Implicit  time  discretization  of  Eq.  (12a)  by  Eq.  (13)  yields 
the  following  difference  equation  for  the  structure: 

+  (14a) 

S^M  +  5D+5‘K  (14b) 

g"  *  1/2  =  5^{f"  *  +  Bu"  *  >'2)  +  M(q"  +  Sq")  +  dDq" 

+  (14c) 

q”-*-'  =  2q"*''^ -q"  (14d) 

q'>*m^^qn*m_qn)j^^  1  ^  (14c) 

It  is  observed  that  the  only  unknown  in  the  right-hand  side  of 
the  preceding  difference  equation  is  u"*  which  is  treated  as 
an  applied  forcing  term  in  solving  for  the  states  q"  *  *  and 
q"*‘,  thus,  leading  to  a  modular  implementation  as  a  unique 
feature  in  the  present  partitioned  solution  procedure. 

Intefratioo  of  Observer  Equations 

Time  discretization  of  Eq.  (12c)  yields  the  following  equa¬ 
tions  for  the  observer: 

5^"+*/2=.|-t  +  i/2  (15a)  • 


Fig.  2  Flow  chart  of  partitiooed  solution  procedure. 
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S=^M-¥8D+5^K  (I5b) 

g"  + ^ 2(/'  + +  Bu"  *  -F  ML^y''  * 

+  Miq''  +  dq'')+SDq''  (15c) 

(15d) 

^n-t- 1^24" -I"  (15c) 

From  Eqs.  (15)  it  is  seen  that  u"*  and  y"*  are  required 
to  numerically  solve  for  the  states  q"  * '  and  q”  *  As  in  the 
case  of  the  structural  analyzer  of  Eqs.  (14),  these  two  un¬ 
known  vectors  are  treated  as  applied  disturbance  terms  so 
that  the  observer  states  can  be  implemented  into  a  modular 
package.  Note  that  both  in  Eqs.  (14)  and  (15)  the  attendant 
matrix  5  possesses  the  same  spanity  and  symmetry  that  exists 
in  the  mass,  damping,  and  stiffness  matrices.  Hence,  linear 
equation  solution  techniques  that  exploit  symmetry  and  spar¬ 
sity  may  be  used  advantageously.  Such  a  solution  capability  is 
widely  available  in  existing  structural  analysis  software  sys¬ 
tems. 

lotegradoii  of  Control  Force  and  State  Eatimatioa  Error  Eqnatiom 
In  advancing  the  time  marching  for  the  structural  and  the 
state  estimation  equations,  it  is  recalled  that  we  have  assumed 
that  both  +  and  are  already  available  from  the 

solution  module  of  the  control  force  and  state  estimation 
error  equations.  We  will  show  in  this  subsection  that 
and  •/"+*'-  can  be  obtained  by  predicting  only  the  state 
estimation  vector 

In  doing  so,  unlike  the  structural  and  observer  equations, 
we  have  decided  to  time  discretize  both  the  control  force  and 
state  estimauon  error  equations  as  a  coupled  set  of  equations. 
Carrying  out  the  necessary  discretization  by  the  midpoint 
implicit  formula  (Eqs.  (13))  yields 

(j6a) 


5  = 


5F,L,  - 


(I6b) 


It  is  noted  that  S  is  not  sparse;  thus  the  partitioned  solution 
approach  is  mainly  oriented  toward  systems  where  the  num¬ 
ber  of  states  (2N)  is  more  than  the  number  of  actuators  m 
and  measurements  r  (i.e.,  r  +  m  <  2N).  The  solution  of  Eqs. 

( 16)  at  the  half  time  step  makes  both  «"  and  y"  *  thus 
permitting  the  solution  of  both  the  structural  displacement 
and  the  state  estimation  vectors  with  the  control  and  state 
estimation  errc  terms  on  the  right-hand  sides  of  Eqs.  (14) 
and  (15).  Since  a  prediction  step  is  involved,  one  typically 
iterates  to  achieve  a  converged  solution  for  q”*'  However, 
as  will  be  shown  in  Sec.  VIII,  the  stabilization  procedure 
used  to  obtain  Eqs.  (9)  and  (11)  (or  Eqs.  (12d)  and  (12e)] 
produces  very  accurate  results  without  iterating  to  obtain 
+ 1/2  -  +  >«  in  most  instances.  To  solve  for  when 

an  observer  is  used,  it  is  necessary  to  predict  q"  * 

(17) 

and  use  to  solve  Eq.  (16)  for  u”*  and  y"  +  (Note 
that  implies  measuring  the  system  output  at  the  half 
time  step.  If  this  is  not  possible,  using  z"  *  *>  z"  will  pro¬ 

duce  a  phase  shift  in  the  observer  state  of  S  in  time.) 


VI.  Stability  and  Accuracy  cf  Partitioned 
Elution  Procedure 

Computational  stability  analysis  of  partitioned  procedures 
for  a  general  coupled  system  is  still  in  an  evolving  stage  as 
discussed  in  Refs.  14  and  32.  Hence,  the  analysis  herein 
applies  the  relevant  results  from  Refs.  14  and  32  in  the  present 
stability  analysis  of  the  partitioned  CSI  solution  procedure. 
The  partitioned  CSI  solution  procedure  presented  in  Eqs. 
(14-16),  although  discretized  by  implicit  time  integration 
formulas,  may  suflTer  from  computational  instability  as  it 
involves  extrapolations  to  obtain  u"*  and  y"-*’'^^.  A  com¬ 
plete  stability  analysis  of  the  partitioned  solution  procedure 
for  the  coupled  structural  dynamics,  observer,  and  controller 
equations  is  difficult  to  perform  unless  the  observc^r  character¬ 
istics  H,L  and  the  controller  characteristics  B,F  are  specified. 
Hence,  the  analysis  that  follows  is  restricted  to  an  ideal 
observer,  i.e.,  y  >>0  so  that  only  Eq.  (14)  and  Eq.  (16a)  are 
considered. 

Stability  Analysis  of  Model  Cootrol-Structare  Intcractioii 

To  assess  the  computational  stability  of  the  present  parti¬ 
tioned  solution  procedure,  ws  construct  a  model  single- 
degree-of-freedom  interaction  equation  as  follows.  First,  ne¬ 
glecting  structural  damping,  a  modal  structural  equation  of 
motion  can  be  expressed  as 

y  +  a>^y  =  — u  (18) 

where  y  is  a  generalized  coordinate  and  q>  is  its  associated 
frequency. 

Second,  the  model  controller  is  assumed  to  consist  of  both 
the  position  and  velocity  feedbcck  with  appropriate  weights 
given  by 

u  =  S  cu,  5  a>„.,  (19) 

where  oi,  is  the  feedback  frequency  that  ranges  from  the 
minimum  to  the  maximum  of  the  structural  frequency  con¬ 
tents,  and  7  and  C  are  positive  scalar  coefficients  that  signify 
the  strength  of  the  position  and  the  velocity  feedback,  respec¬ 
tively. 

Combining  Eq.  ( 18)  with  the  stabilized  form  of  Eq.  ( 19),  we 
have  the  model  interaction  equation 

y-y(i)^y=~u  (20a) 

li -)- CcOfK  =  i/oijy  —  (20b) 

Thus,  the  model  interaction  equations  given  by  Eqs.  (20) 
represent  the  c.ise  of  full-state  feedback.  They  do  not,  how¬ 
ever,  reflect  the  mode-to-mode  coupling  that  can  occur  in 
reduced-order  feedback  controller.  Nevertheless,  an  analysis 
of  the  computational  stability  using  the  preceding  model 
interaction  equations  should  shed  insight  on  the  overall  stabil¬ 
ity  of  the  present  partitioned  solution  procedure. 

Application  of  the  partitioned  CSI  solution  procedure  (Eqs. 
(14-16))  with  y  =  0  to  solve  the  preceding  model  equations 
yields 

yy  Ui  y"  ^  Sy”  (21a) 

( 1  -1-  5CcOr)u1;*  =  (ifcoj  —  (5CcOfa>^)yJ *  -h  (co^y"  (21b) 
(1  +  5^co')y"  * +y"  +  5y’'  (21c) 

yi’+t  —  2y''*  —  y",  y""*"  =  (y""^  ~  y'')j5 

y"*' =  2y'"^''^-y"  (21d) 

«''-"'  =  if<u?y"*'-fCaj,y"-'  (21c) 

Computational  stability  of  the  model  form  of  CSI  partitioned 
equations  (20)  can  be  assessed  by  seeking  a  nontrivial  solu- 


tion  of  the  preceding  difference  equation  (21)  by 


(22) 

such  that 

i;.|  s  I 

(23) 

for  stability. 

Substituting  Eq.  (22)  into  Eqs.  (21)  and  eliminating  y,  one 
obtains 


where 


Assuming  C  <  1,  the  first  tenn  in  the  preceding  condition 
allows  a  sufficiently  large  step  size.  However,  since  C/*!  *  1 
for  a  balanced  control  law,  it  imposes  a  step  size  restriction 
h  « 2/w^,  which  approaches  the  limit  imposed  by  a  typical 
explicit  integration  formula.  This  proves  the  advantage  of  the 
present  stabilized  partitioned  solution  equation  (12)  solely 
from  the  computational  stability  viewpoint. 

Although  not  elaborated  herein,  a  stability  analysis  that 
includes  an  observer  model  and  the  state  estimation  error 
equation  has  been  conducted  with  the  following  parameter 
choices: 

in  conjunction  with  the  structural  model  already  used  in  Eq. 


J 


r<5(i+^cu).)  a  +  1)" 

L  +  1)^ 


4X(S^Zu)cCO^  -  4-  2Ccu,(  1  +  2)' 

(l+^^a)^)(;. +  l)^-4/l 


To  test  the  stability  requirement  of  Eq.  (23)  on  the  character-  ^  '  " 

istic  equation,  i.e.,  det|y|  =  0,  one  transforms  |2|  5  1  into  the  (20).  The  analysis  result  yields  the  following  step  size  restne- 
entire  left-hand  plane  of  the  z  plane  by  tion 


;;  =1^.  |a|  <  1  Re(z)  ^  0  (25) 

Carrying  out  the  necessary  algebra  we  have  from  det|/(z)|  =  0 
the  following  r-polynomial  equation: 

-  S'rjo)^  +  l)c-  +  {SCcOc)z  +5^ri(i)l  +(o-)  =0 

(26) 

A  test  of  the  polynomial  equation  (26)  for  possible  positive 
real  roots  by  the  Routh-Hurwitz  entenon  (see,  e.g.,  Gant- 
macher^’)  indicates  that  the  partitioned  procedure  as  applied 
to  the  model  coupled  equations  (18)  and  (19)  gives  a  stable 
solution  provided 


((5W<u'-<5*’f|cu?  +  1)  StO  (27) 

Note  that  if  there  is  no  position  feedback  (i.e..  ri  =0),  the 
model  interaction  equations  solved  by  the  present  partitioned 
solution  procedure  (Eqs.  (14-16)]  yields  unconditionally  sta¬ 
ble  solutions  as  Eq.  (27)  is  automatically  satisfied.  Hence,  a 
more  critical  stability  assessment  can  be  made  by  assuming  no 
velocity  feedback  (i.e.,  J  =  0)  for  which  we  have  stability  from 
Eq.  (27) 

h  2/y/^(i)c  (28) 

The  preceding  stability  analysis  on  the  model  interaction 
equations  permits  us  to  make  the  following  observations. 
First,  Eq.  (28)  indicates  that  feedback  frequency  and  the 
strength  of  the  position  feedback  tf  dictate  the  computational 
stability  and  not  the  structural  frequency  <o.  In  other  words, 
the  position  feedback  dictates  the  allowable  step  size  for 
stability.  Thuj  the  highest  frequency  of  the  controller  governs 
stability,  not  the  highest  frequency  of  the  structure.  Since 
most  controllers  are  designed  with  reduced-order  structure 
models  that  ignore  high-frequency  dynamics,  the  present  solu¬ 
tion  procedure  is  not  unduly  restricted  by  stability. 

Second,  if  velocity  feedback  is  present,  the  allowable  step 
size  for  stability  increases  until  C  ^  v^4»;V27  at  which  point 
the  solution  becomes  unconditionally  stable. 

It  should  be  noted  that,  instead  of  the  stabilized  form  of 
control  force  (Eq.  (12d)  or  (20b)],  if  the  scalar  form  of  Eq. 
(7a)  is  used  in  the  preceding  stability  analysis,  the  resulting 
stability  limit  is  given  by 


(29) 


h  s  min(2;Cco<„2/.y^a»,.,2/v/^)  (31) 

It  should  be  noted  that  4,  corresponds  to  the  Kalman  filter 
gain  magnitude,  which  can  be  adjusted  to  be  sufficiently  small 
compared  with  cu-  as  can  be  assessed  from  Eq.  (5b).  Hence, 
provided  4|  <£0^,  the  condition  given  by  Eq.  (28)  is  seen  to 
govern  the  maximum  stable  step  size  by  the  present  parti¬ 
tioned  solution  procedure. 

For  the  general  multidimensional  case  governed  by  Eqs. 
(14-16),  one  observes  that  the  stiffness  proportional  control 
force  in  practice  reaches  only  a  fraction  of  the  total  internal 
force  («  =  rjKq,  r;  <  1 ).  Hence,  even  for  a  distributed  stiffness 
proportional  control  configuration  where  to, the  sta¬ 
ble  step  size  given  by  Eq.  (28)  should  be  much  larger  than  the 
maximum  stable  step  size  of  a  typical  explicit  integration 
algorithm  (say,  s  2/c(;„„).  Therefore,  the  computational 
efficiency  of  the  present  partitioned  solution  procedure  is 
established. 


Accuracy  Assessment 

In  addition  to  the  stability  consideration,  the  step  size  must 
a’so  be  chosen  based  on  accuracy  considerations.  Although 
the  midpoint  implicit  integration  formulas  produce  no  artifi- 
aal  damping,  there  does  exist  a  frequency  distortion.  The 
apparent  frequency  to  true  frequency  ratio  is  given  by 


27t^“"  l,/V,(l -(;t^/Af^)] 


(32) 


where  N,  is  the  number  of  steps  per  cycle,  iV,  =(2jt)/(Aci)). 
Figure  3  shows  the  frequency  distortion  as  a  function  of  the 
number  of  steps  per  cycle.  There  must  be  18  steps  per  cycle  to 
produce  less  than  l®/«  frequency  error.  Thus,  the  step  size 
based  on  1  %  frequency  error  is 


)iS2:t/N,cu=0.349/£o  (33) 

Comparing  Eq  (28)  to  Eq.  (33)  one  finds  rj  ^  32.84  before 
stability  governs  the  step  size  and  not  the  1%  allowable 
frequency  distortion.  Thus,  for  most  practical  considerations, 
accuracy  of  the  present  integration  formulas  rather  than 
stability  govern  the  selection  of  the  integration  step  size  h. 


Vn.  Computational  Efficiency 

Simulation  of  the  CSI  equations  in  second-order  form  is 
prompted  in  part  by  potential  increases  in  computational 
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efficiency.  The  computational  benefits  of  matrix  sparsity  and 
symmetry  on  the  left-hand  side  (LHS)  of  the  second-order 
finite  element  based  equations  are  reduced  by  the  additional 
computations  needed  to  maintain  the  control  and  state  esti¬ 
mation  error  terms  on  the  nght-hand  side  (RHS)  of  the 
equations.  Therefore,  we  will  assess  the  relative  efficiency  of 
the  simultaneous  solution  procedure  of  Eq.  (6)  and  the  parti¬ 
tioned  solution  procedure  of  Eqs.  ( 14-16).  For  simplicity,,  the 
computational  efficiency  is  estimated  based  on  an  au¬ 
tonomous,  deterministic  system,  /=  =  p  =  0.  The  number 

of  floating  point  operations  (FLOP)  are  approximated  to  an 
accuracy  of  order  N,^  where  N  is  the  number  of  degrees  of 
freedom. 

The  simultaneous  solution  procedure  given  by  Eq.  (6)  may 
be  solved  either  by  a  set  of  first-order  differential  equation 
solvers  or  by  a  matrix  exponential  approach.  Since  the  size  of 
the  solution  matrix  is  4N  x  4N,  in  addition  to  factoring  of  the 
solution  matrix  once  at  the  beginning  of  the  computation  for 
time-invariant  cases,  a  total  of  16N^  storage  locations  16/V^ 
FLOP  are  required  at  each  time  step. 

When  one  adopts  the  partitioned  solution  procedure  [Eqs. 
(14-19)]  as  5  is  a  sparse  and  symmetric  matrix,  considerable 
storage  and  computational  savings  can  be  attained.  If  the 
matrix  element  bandwidth  of  5  is  proportional  to  iV  by  a 


bandwidth  =  aW; 


then,  only  aN^  storage  locations  arc  needed.  An  L~U  decom¬ 
position  of  the  S  matrix  (which  requires  ([a'N^ +  3af>/^]l 
7'  -1-  0(N)  FLOP)  is  performed  once  for  time-invariant 
..ystems.  Then,  at  each  time  step,  the  RHS  is  calculated,  and 
a  lower  and  upper  triangular  kilution  is  performed  to  com¬ 
pute  the  states.  The  partitioned  solution  procedure  requires 
[  12a(V^  +  (r  +  my  +  4rN  +  4mN]  -t-  0{N)  FLOP,  where  m  is 
the  number  of  actuators  and  r  is  the  number  of  measure¬ 
ments.  The  number  of  sensors  and  actuators  is  usually  small 
compared  with  the  system-order  N.  The  value  of  a  for  which 
the  partitioned  solution  approach  becomes  more  computa¬ 
tionally  attractive  than  the  simultaneous  solution  approach 
must  be  determined.  If  the  assumption  is  made  that  the 
number  of  actuators  m  and  the  numtxr  of  measurements  r  are 
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proportional  to  iV  by  )? 

r  =  m  =  PN 

the  values  of  a  and  P  for  which  the  second-order  solution  is 
more  efficient  than  the  first-order  solution  are  readily  ob¬ 
tained.  Figure  4  shows  the  efficiency  ratio  of  the  simultaneous 
and  the  partitioned  solution  procedures  for  vanous  values  of 
a  and  p.  For  practical  cases  where  a  4  1  and  P  <  I,  the 
partitioned  solution  approach  is  much  more  efficient. 

It  should  be  noted  that  the  FLOP  counts  assessed  previ¬ 
ously  are  only  approximate  as  their  precise  value  depends  on 
the  cleverness  of  the  implementation.  Also,  additional  compu¬ 
tational  savings  are  possible  if  more  efficient  data  structures 
such  as  profile  storage  schemes  are  employed  for  the  mass, 
damping,  and  stiffness  matrices. 

VIII.  Numerical  Experiments 

The  time-discretized  CSI  equations  [Eqs.  (14-16)]  have 
been  implemented  into  three  modules:  the  structural  analyzer, 
the  state  estimator,  and  the  solver  for  the  interaction  terms. 
The  examples  herein  have  concentrated  on  the  structural 
analyzer  and  the  control  force  interaction  term.  Additional 
examples  with  state  estimation  are  presented  in  Refs.  26  and 
28. 

The  first  numerical  example  is  a  beam  with  10  finite  ele¬ 
ments  and  an  actuator  placed  on  node  10  as  shown  in  Fig.  5. 
The  actuator  gains  have  been  determined  using  a  single  mode 
in  the  control  law.  The  beam  is  initially  bent  according  to  its 
first  mode  shape,  and  the  controller  must  regulate  the  re¬ 
sponse  to  1  %  of  its  initial  amplitude  wthin  0.5  s.  Figure  6 
illustrates  the  tip  displacement  response  and  the  control  force 
u  vs  time.  To  assess  the  effectiveness  of  the  present  partitioned 
solution  procedure,  the  response  has  been  computed  using 
both  the  simultaneous  and  the  present  technique  for  N,  =  20 
and  N,  =  10.  The  simultaneous  technique  docs  not  use  stabi¬ 
lization  [Eq.  (9)]  for  the  computation  of  a'’’*'  We  have  also 
computed  the  control  force  by  postprocessing  Eq.  (Id)  in¬ 
stead  of  the  augmented  form  of  Eq.  (9).  Figure  7  compares 
the  control  force  error  computed  by  the  present  stabilized  Eq. 
(12d)  vs  that  by  direct  substitution  into  the  unaltered  Eq.  (Id) 
for  step  sizes  of  20  and  10  samples  per  response  cycle.  It  is 
noted  that  the  present  partitioned  solution  procedure  yielu^ 
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far  better  accuracy  than  the  conventional  direct  substitution 
method. 

Of  course,  one  can  eliminate  the  solution  errors  associated 
with  the  conventional  simultaneous  solution  scheme.  How¬ 
ever,  this  requires  solving  the  CSI  equation  in  its  entirety  as 
given  by  Eq.  (6),  which  cannot  be  carried  out  in  a  modular 
software  environment. 

To  illustrate  the  procedure  on  more  realistic  structures,  we 
have  performed  transient  response  analyses  on  the  truss  beam 
shown  in  Fig.  8.  The  truss  was  modeled  by  finite  elements 
with  one  Timoshenko  element  from  joint  to  joint.  The  model 
had  990  degrees  of  freedom.  The  truss  is  described  in  more 
detail  in  Ref.  25.  A  modal  space  control  law  with  seven  modes 
was  used  to  suppress  vibtrations  of  the  beam  induced  by  the 
loading  shown  in  Fig.  8.  Both  position  and  rate  feedback  were 
used  to  reduce  the  vibration  amplitude  to  0.025  in.  within  10  $ 
after  active  control  was  initiated. 

Figure  9  shows  the  truss  response  along  with  the  perfor¬ 
mance  of  the  second-order  observer  of  Eq.  (15).  Notice  that 
the  observer  that  is  turned  on  concurrently  with  the  actuator 
faithfully  follows  the  structural  response  within  an  acceptable 
time  lapse.  Figure  10  demonstrates  the  errors  in  computing 
the  control  force  by  the  stabilized  Eq.  ( 12d)  and  by  directly 
substituting  into  the  unaltered  Eq.  (Id).  The  computation  of 
the  control  force  by  the  stabilized  Eq.  (12d)  is  usually  more 
than  an  order  of  magnitude  more  accurate  than  using  the 
original  form  of  Eq.  (Id).  This  high  accuracy  removes  the 
necessity  of  iterating  during  the  prediction  step. 

Most  important,  the  proposed  technique,  which  exploits  the 
second-order  form  of  the  structure  equation,  can  be  used  to 
solve  this  990-degree-of-freedom  problem  without  resorting  to 
a  truncated  modal  model.  Thus  simulation  can  be  efficiently 
performed  with  “truth”  models  to  verify  performance  and 
robustness  of  control  laws  developed  from  reduced  order 
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models.  It  is  this  feature  that  will  alleviate  much  of  the 
computational  difficulties  associated  with  the  study  of  con¬ 
trol-stricture  interactions. 


EX.  Concluding  Remarks 

During  the  development  of  the  present  partitioned  proce¬ 
dure  for  conducting  control-structure  interaction  analysis, 
several  theoretical  and  computational  issues  have  been  raised. 
First,  the  availability  of  a  second-order  observer  model  is 
required  to  exploit  the  symmetry  and  sparsity  for  efficiency 
purposes.  However,  second-order  observers  pose  restrictions 
on  the  design  of  observer-based  controllers,  ^ond,  for  time- 
variant  systems,  the  solution  of  a  Ricca*’  equation  to  deter¬ 
mine  the  control  force  with  appropriate  terminal  conditions 
and  the  solution  of  another  Riccati  equation  for  the  observer 
equation  with  given  initial  conditions  can  pose  bottlenecks  in 
real-time  control-structure  interaction  simulations.  (Note  that 
these  two  solutions  are  required  when  using  optimal  control 
theory  to  obtain  the  control  and  observer  gain  matrices.) 
Parallel  computing  can  potentially  remove  the  aforemen¬ 
tioned  bottlenecks  of  the  time-variant  problem.  Finally,  we 
have  not  considered  the  intrinsic  dynamics  of  both  the  actua¬ 
tor  and  the  sensor.  However,  since  the  present  pi  (  cedure  uses 
a  differential  form  fori  the  actuator  and  sensor  equations, 
intrinsic  dynamics  could  be  incorporated  into  the  present 
computational  procedure  without  too  much  difficulty..  Further 
experiments  and  inclusions  of  more  realistic  control-structure 
interaction  models  are  necessary  before  the  present  simulation 
procedure  can  become  a  production-simulation  tool.  This  is 
being  carried  out  at  present. 

Appendix:  First-Order  Observer  Solution 

The  first-order  observer  can  be  numerically  integrated  as 
described  as  follows.  Implicit  midpoint  formulas  are  used  in 
the  time  discretization.  All  variables  are  defined  in  Eq.  (1). 
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The  first-order  observer  takes  *he  form 

x^Ax+Ef+Su  +  L(z-Hx)  (Al) 

Combining  like  terms,  we  derive 

X  »  Lz  (A2) 

where 

r  —L\Hi  l—L^H,  "I 

Time  discretization  yields 

(/  -  ^/4o)i"  “  SiEf  -  +  Lj*  -I-  X"  (A3) 

x"-*-' -2x"-"‘'^-x"  (A4) 

_Pgn*M2 

Equation  (15)  would  be  replaced  by  Eq.  (A3)  in  the  integra¬ 
tion  procedure.  Then,  Eq.  (A5)  would  be  used  to  solve  Eq. 
(16a)  and  there  would  be  no  need  to  solve  for  y.  The 
computational  efficiency  of  the  first-order  observer  of  Eq. 
(A3)  IS  discussed  in  Sec.  VII  of  the  paper. 
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Fig.  4  Decomposition  of  the  Structure  with 
“Finite  Element  Chips” 


As  an  example,  consider  the  element  e,  mapped  onto  the  processor  p  as  shown 
in  Fig.  5.  The  internal  nodes  1  and  2  need  data  transfer  only  from  processors  R  and 
T.  On  the  other  hand,  nodes  3  and  4  do  need  information  from  all  the  neighboring 
processors.  It  is  this  need  that  requires  an  efficient  an<l  reliable  mapping,  intcrprocc.ssor 
communication  algorithms  and  streamlined  data  arrangement  as  described  abtive. 
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Structural  tailoring  provides  an  atlmctivc  method  to  optimize  the  performance  of  actively  controlled  space 
structures.  However,  the  simultaneous  optimization  of  control  gains  and  structural  properties  often  becomes 
prohibitively  expensive  for  large  systems,  and  physical  insight  is  often  lost  in  the  resulting  control  law.  This 
paper  presents  a  method  for  optimization  of  the  closed-loop  structural  system  using  only  structural  tailoring. 
Optimal  linear  quadratic  regulator  (LQR)  control  theory  Is  used  with  weighting  matrices  chosen  based  on 
physical  considerations.  The  LQR  control  law  depends  only  on  two  scalar  gains  and  the  structural  properties. 
Hence,  the  closed-loop  performance  can  be  expressed  in  terms  of  the  structural  parameters.  Results  are  given  for 
a  beam  and  a  truss  beam  to  show  the  simplicity  of  the  method  and  the  importance  of  structural  tailoring  to 
increase  dynamic  performance  and  to  reduce  control  effort. 


Nomenclature 

A  =  State  matrix 

Oj  =  real  part  of  the  yth  circular  frequency 

B  =  control  influence  matrix 

bj  =  imaginary  part  of  the  yth  circular  frequency 

C  =  damping  matrix 

D  -  actuator  influence  matrix 

E  « sensor  influence  matrix 

E  =  Young’s  modulus 

/  =  disturbance  force  vector 

G  =  equal  to  one-half  of  the  critical  damping  matrix 

G  =  shear  modulus 

I  =  identity  matrix 

/  =  equal  to  V  -^1 

J  =  scalar  performance/cost  index 

K  =  stiffness  matrix 

(  =  beam  length 

M  =  mass  matrix 

P  s  Riccati  matrix  for  optimal  control 
Q  =:  state  weighting  matrix 

q  =  Structural  displacement  vector 

^  =  structural  velocity  vector 

R  s  control  force  weighting  matrix 

T  =  eigenvector  matrix 

t  s  beam  thickness 

U  s:  triple  matrix  product,  Eq.  (20) 

u  =  control  force  vector 

V  =  proportional  control  gain  matrix 

W  =  rate  control  gain  matrix 

X  =  state  vector 

X  s:  temporal  derivative  of  state  vector 

y  » system  output  .. 

i  s  modal  displacement  vector 
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i  =  modal  velocity  vector 

a  =  scalar  weighting  of  strain  energy 

6  =  scalar  weighting  of  kinetic  energy 

y  =  modal  force  participation  coefficient 
Uj  =yth  circular  frequency 

A  =  diagonal  eigenvalue  matrix 

rj  =  scalar  proportional  control  gain 

« scalar  rate  control  gain 
fi  »  mass  density 


I.  Introduction 

PPLICATIONS  of  optimal  designs  in  aerospace  struc¬ 
tural  engineering  are  becoming  increasingly  important 
due  to  the  high  cost  of  spacecraft,  more  stringent  performance 
requirements,  and  increasing  emphasis  on  structural  safety  for 
space  deployment.  These  considerations  are  particularly  im¬ 
portant  in  the  design  of  space  structures  that  employ  active 
feedback  control.  A  number  of  recent  studies  have  considered 
the  simultaneous  optimization  of  both  structure  and  control 
system,  as  can  be  found  in  Refs.  1-10.  These  works  have 
demonstrated  that  tailoring  of  the  structural  mass  and  stiff¬ 
ness  can  improve  performance  and  reduce  the  cost  of  active 
control.  However,  conventional  control/structure  optimiza¬ 
tion  usually  involves  a  large  number  of  control  gains  which 
become  part  of  the  overall  system  design  variables.  For  large 
problems,  the  number  of  control  and  structural  design  vari¬ 
ables  can  make  simultaneous  optimization  prohibitively  ex¬ 
pensive. 

A  recent  approach  to  simultaneous  control  structure  opti¬ 
mization,  found  for  example  in  Refs.  8-10,  has  involved  the 
use  of  optimal  control  theory  with  weighting  matrices  chosen 
to  be  functions  of  the  structural  mass  and  stiffness  matrices. 
This  method  yields  a  control  law  that  depends  only  on  struc¬ 
tural  parameters  and  several  scalar  gains.  Although  such  an 
approach  does  not  guarantee  the  “best”  control  law,  it  does 
provide  the  advantage  of  reducing  the  number  of  design  vari¬ 
ables  as  compared  to  the  conventional  control/structure  opti¬ 
mization  procedure.  Unfortunately,  even  when  the  control  law 
is  expressed  in  terms  of  the  structural  parameters,  simulta¬ 
neous  optimization  of  controls  and  structures  often  reduces  to 
a  set  of  nonlinear  constrained  equations,  which  are  difficult  to 
interpret  in  terms  of  the  underlying  physics. 
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For  successful  interdisciplinary  control  structure  optimiza¬ 
tion,  physical  insight  into  the  effect  of  structural  tailoring  on 
the  closed-loop  system  is  needed.  To  this  end,  we  propose 
using  optimal  control  theory  with  the  weighting  matrices  of 
Refs.  8-10  in  conjunction  with  modal-space  control."  A 
closea-''':,m  solution  for  the  control  law  that  yields  substantial 
physir-al  insight  into  the  proper  structural  tailoring  objective  is 
presented.  The  paper  shows  that  weighting  matrices  that  min¬ 
imize  system  energy  in  the  performance  cost  functional  result 
in  control  gains  that  exploit  the  intrinsic  characteristics  of  the 
structural  stiffness  and  mass  matrices.  Hence,  optimization  of 
the  closed-loop  system  can  be  performed  using  only  structural 
tailoring.  A  structural  tailoring  objective  is  derived  that  is 
simple  enough  to  be  used  in  the  initial  design  of  actively 
controlled  structures.  Results  for  a  simple  beam  and  a  more 
complicated  truss  strucn.re  are  used  to  show  the  simplicity  of 
the  proposed  structural  tailoring  procedure  as  well  as  the 
importance  of  tailoring  structures  to  increase  system  perfor¬ 
mance  and  to  decrease  control  effort. 

11.  Physical  Choices  for  Optimal  Controi 
Weighting  Matrices 

Optimal  linear  quadratic  (LQ)  design  techniques  are  fre¬ 
quently  used  to  synthesize  controi  laws  for  multi-input,  multi¬ 
output  systems.  The  synthesized  control  law,  u,  is  nonlinearly 
related  to  matrices  that  weight  the  cost  of  performance  and 
control.  The  following  paragraphs  describe  a  choice  of  weight¬ 
ing  matrices  based  on  physical  considerations  that  were  also 
used  in  Refs.  8-10.  First,  the  governing  equations  are  de¬ 
scribed,  then,  the  energy  of  the  closed-loop  system  is  used  to 
choose  the  weighting  matrices. 

A.  Governing  Equations  for  Linear  Quadratic  Reguiator  Design 
For  the  present  discussion,  we  consider  an  unforced  struc¬ 
tural  system  with  full  state  feedback  control.  The  objective  of 
the  control  law,  known  as  a  regulator,  is  to  suppress  vibrations 
which  may  have  been  induced  by  rigid  body  slewing  or  exter¬ 
nal  disturbances.  T^e  equations  of  motion  for  this  system  may 
be  written  in  discrete  form  as 

-h  K?  =  D« ,  q(Q)  =  ?o.  ?(0)  =  ?(,  (i) 

Equation  (1)  may  also  be  written  in  first-order,  state  variable 
form  as 


state  matrix  Riccati  equation 

0  =  Q  +  PA  +  A^P  -  PBR-  'B^P  (5) 

Thus,  it  is  obvious  that  the  control  gain  (-RB^P)  is  nonlin¬ 
early  related  to  the  weighting  matrices  Q  and  R.  Finding  the 
“best”  choice  of  Q  and  R  can  be  one  of  the  more  difficult 
steps  in  the  feedback  control  design  process.  Simultaneous 
optimization  of  structural  properties  as  well  as  elements  of  the 
Q  and  R  matrice<  becomes  prohibitively  expensive  for  large 
problems.  In  addition,  it  frequently  leads  to  a  total  loss  of 
physical  insight  into  the  resulting  control  gains.  However,  by 
choosing  the  weighting  matrices  a  priori  to  yield  consistent 
physical  quantities  in  the  cost  index  of  Eq.  (3)  (e.g.,  energy, 
forces,  displacements),  one  can  arrive  at  a  control  law  that 
preserves  physical  insight. 


B.  Minimization  of  Energy 

The  objective  of  many  optimization  problems  involves  min¬ 
imizing  the  system  energy.  For  structure/control  problems,  if 
the  stiffness  matrix  is  positive  definite  (i.e.,  there  are  no  rigid 
body  modes),  a  logical  choice  of  weighting  matrices  to  mini¬ 
mize  the  energy  of  the  structure  and  the  quasistatic  “work”  of 
the  controller  is 


aK  0 
0  /3M, 


R=  (D^K-‘D1 


(6) 


The  coefficients  a  and  0  weight  the  structure’s  strain  and 
kinetic  energy.  The  work  of  the  controller  is  implicitly 
weighted  by  a  and  |3  [a,  /3  a  0  and  (a  +  /3)>0).  Minimization 
of  the  controller  work  is  relevant  where  both  limited  force  and 
stroke  are  available  as  with  inertial  mass  actuators.  For  cases 
where  the  stiffness  matrix  is  not  positive  definite,  rigid  body 
motion  could  be  removed  by  a  reduction  technique  and  the 
controller  designed  for  flexible  modes  of  vibration  only.. 
Equation  (6)  differs  slightly  from  that  given  in  Refs.  8-10  in 
that  only  two  scalar  weights  are  used. 

Solution  of  the  matrix  Riccati  equation  with  the  weighting 
matrices  of  Eq.  (6)  yields  a  control  law  which  depends  only  on 
the  scalar  weights  a  and  0  and  the  structural  mass  and  stiffnesj 
matrices.  As  will  be  shown  in  the  next  section,  a  closed-for 
solution  for  the  optimal  control  law  is  available  when  the 
actuator  influence  matrix,  D,  is  full  rank. 


x  =  Ax  +Bu  y  =  Ex 


(2) 


where 


A  = 


0  I 

M-'K  -M-'C 


B  = 


0 

M-'DJ’ 


For  the  regulator  design,  we  wish  to  minimize  the  response 
of  the  closed-loop  system  and  the  control  effort  simulta¬ 
neously.  This  may  be  expressed  using  the  following  quadratic 
cost  functional 


III.  Closed-Form  Solution  of  the  Riccati  Equation 
A  closed-form  solution  of  the  Riccati  equation  can  be  easily 
derived  for  the  preceding  weighting  matrices  when  the  number 
of  actuators  is  equal  to  the  number  of  model  degrees  of 
freedom  (D  is  full  rank).  Meirovitch"  has  exploited  the  case  of 
D  being  full  rank  to  develop  modal-space  control  when  the 
number  of  actuators  is  equal  to  the  number  of  controlled 
modes.  This  paper  reviews  the  case  where  D  is  full  rank 
because  it  so  clearly  illustrates  the  physical  aspects  of  the 
control  law  when  the  weighting  matrices  of  Eq.  (6)  are  used. 
First  the  solution  is  discussed  in  spatial  variables  and  then  in 
modal  form. 


'm 

-  (x^Qx  +  u^)  dr  (3) 

».2 


where  Q  and  R  are  weighting  matrices  which  are  based  on' the 
relative  imponance  of  each  state  and  control  force,  respec¬ 
tively.  The  only  restrictions  on  Q  and  R  are  that  Q  must  be  at 
least  semidefinite,  and  R  must  be  positive  definite. 

To  minimize  the  preceding  functional,  the  optimal  control 
force  can  be  derived  as  given  in  basic  texts,  such  as  in  Ref.  12, 
to  be 


A.  Spatial  Form  of  the  Energy-Based  Control  Law 
If  we  restrict  our  attention  to  the  case  where  C  =  0  (i.e.,  no 
structural  damping)  substituting  Eqs.  (2)  and  (6)  into  Eq.  (5) 
yields 


^  2fG  vM 
L’JM  fMK-'G, 

where 

,=vrT^-i 


(7) 


u  »  -R-‘B^P* 


(4) 


where  P  is  the  only  positive  definite  solution  to  the  steady- 
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Equation  (?),  when  substituted  into  Eq.  (4),  yields  the  optimal  Equation  (14)  yields  the  optimal  modal  control  law  vector  to 
control  law  vector  to  be  be 


Du  =  -t?K9  -  fGfl 


(8) 


6u  *  -ijAz  - 


Theoretically,  with  D  a  full>rank  matrix,  the  closed-loop  ei¬ 
genvalues  and  eigenvectors  can  be  placed  anywhere.  Hence  it 
is  interesting  to  note  where  the  optimal  control  law  places  the 
eigenvalues  and  eigenvectors  when  minimization  of  energy  is 
used  as  a  cost  index. 

The  first  term  of  Eq.  (8)  yields  a  force  directly  proportional 
to  the  internal  stiffness  of  the  structure.  Note  that,  as  a  is 
increased,  we  increase  the  speed  of  response  of  the  structure 
by  essentially  multiplying  the  eigenvalues  of  the  structure  by 
(1  +  ti).  The  second  term  in  Eq.  (8)  produces  equal  damping  iu 
ail  modes  of  the  structure.  Critical  damping  for  a  structure  is 
given  by  2G;  thus,  the  damping  ratio  for  each  mode  of  the 
closed-loop  system  is 

f  =  V(,  +  ^)/[2(l  +  ,)l  (9) 

The  pole  locations  are  found  by  multiplying  each  of  the  open- 
loop  poles  ( ±iuj)  by  i  scalar,  such  that  the  closed-loop  poles 
(a,  ±  ibj)  are  given  by 

Oj  ±  ibj  =  (uyVmjj  (-?  ±  /Vl  —  (10) 

Thus  choosing  weighting  matrices  of  the  form  given  by  Eq.  (6) 
moves  the  poles  in  a  manner  that  yields  equal  damping  ratios 
for  all  modes.  The  closed-loop  eigenvectors  are  unchanged 
from  the  open-loop  vectors  when  D  is  full  rank.  Rarely  will  the 
number  of  actuators  be  equal  to  the  number  of  spatial  degrees 
of  freedom:  hence,  the  next  section  examines  a  reduced-order 
modal  mo  '  d. 

B.  Modal  Form  of  the  Energy-Based  Control  Law 
Equation  (2)  may  be  transformed  from  a  physical  (spatial) 
basis  to  a  modal  basis  by  the  eigenvector  matrix  T,  which  is 
orthonormal  with  respect  to  M.  Applying  the  transformation 
q  =Tz  one  can  derive  the  first  order  modal  equations  to  be 

i  =  Ai  +  8H  (11) 


where 


in  which  A  is  the  diagonal  eigenvalue  matrix  and  6  =  T^. 
The  matrix  6  is  a  square  matrix  if  the  number  of  actuators  is 
equal  to  the  number  of  modes  used  in  the  transformation. 

The  quadratic  functional  to  be  minimized  may  also  be  writ¬ 
ten  in  modal  coordinates  as 


or  in  spatial  coordinates  the  control  law  vector  is 


Du  =  -7;D6-'AT'‘M9  -  fO0-'A*^T''Mg  (15) 

Note  that  Eq.  (IS)  reduces  to  Eq.  (8)  when  no  modes  are 
truncated  (i.e.,  T  is  a  square  matrix,  D0“’  *  MT). 

By  choosing  the  weighting  matrices  to  yield  consistent  phys¬ 
ical  units  in  the  quadratic  functional,  the  control  depends  only 
on  two  scalar  gains  and  the  structural  properties.  Even  for  the 
more  general  case  when  the  number  of  actuators  is  not  equal 
to  the  number  of  degrees  of  freedom  in  the  discrete  model 
(i.e.,  when  no  closed-form  solution  is  generally  available),  the 
control  will  still  be  dependant  only  on  two  scalar  gtuns  and  the 
structural  properties.  Such  a  control  law  permits  more  physi¬ 
cal  insight  into  the  closed-loop  system  and,  as  will  be  discussed 
in  the  following  sections,  is  amenable  to  optimization  by  struc¬ 
tural  tailoring. 


IV.  Structural  Tailoring  to  Optimize 
Closed-Loop  Performance 

To  minimize  the  functional  of  Eq.  (3)  with  respect  to  some 
set  of  design  variables,  the  Hrst  step-involves  evaluation  of  the 
quadratic  cost  function  which  becomes  the  minimization  ob¬ 
jective  in  the  optimization.  Since  a  closed-form  solution  for 
the  Riccati  equation  exits,  the  cost  function  may  be  expressed 
in  terms  of  the  initial  state,  that  is,  the  state  when  the  control 
system  is  activated.. 


y=l  ( dT»^Xo^Pxo 


(16) 


Thus,  to  evaluate  the  cost  function,  we  must  estimate  the 
initial  state  of  the  structure.  Fortunately,  for  open-loop  struc¬ 
tures,  we  can  estimate  the  initial  state  assuming  the  structure  is 
excited  by  external  disturbances.  The  following  sections  de¬ 
scribe  a  quasistatic  measure  of  the  structural  response  due  to 
unknown  disturbances.  This  approximate  measure  of  system 
response  is  then  used  to  compute  the  magnitude  of  the  cost 
function  given  by  Eq.  (16). 


A.  Approximation  of  Closed-Loop  Response  due  to  Unknown  Dis¬ 
turbance 

To  minimize  Eq.  (16),  the  peak  magnitude  of  the  displace¬ 
ment  vector  q  and  velocity  vector  q  have  been  approximated 
based  on  the  open-loop  modal  response  due  to  an  external  step 
load.  Given  an  undamped  structural  system  subjected  to  an 
external  force 


where 


J  = 


I 


'I  1 

-  (i^Ox  +  uTla)  dr 


0  =  T’'QT  = 


aA 

0 


0 

01. 


(12) 


Mq  +  Kq  =/ 

the  peak  response  can  be  computed  by  a  summation  of  the 
linear  modes  of  vibration.  For  a  step  load,  the  peak  displace¬ 
ment  and  velocity  can  be  easily  found  to  be  proportional  to 

qocTA-‘TY,  qocTA-^T^f  (17) 


and  R  is  written  in  modal  form  as  [firA“'iJ]. 

Under  the  restriction  that  C  »  0  and  the  number  of  actua¬ 
tors  is  equal  to  the  number  of  modes  in  the  modal  model,  a 
closed-form  solution  for  the  modal  Riccati  equation 


To  estimate  the  effects  of /in  thi.s  study,  we  expand /into  an 
orthonormal  basis  of  the  form 

/^M^'Ty  (18) 


is 


0  =  Q  -I-  Pa  +  A^P  -  #8r-'8^ 


P 


l^A'^  r,l 

.  nl 


(13)  where  y  is  a  vector  of  modal-force  participation  coefficients. 
The  modal-force  participation  coefficients  are  dependant  on 
the  disturbance;  however,  if  no  disturbance  information  is 
known,  equal  participation  of  all  modes  can  be  assumed.  For 
the  study  herein,  yy  ==  1  for  all  modes. 
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Substituting  Eq.  (18)  into  (17)  and  writing  in  state  vector 
form  we  derive 


where 

U  -  T^'^T  (20) 

Equation  (19),  albeit  approximate,  gives  a  measure  of  the  peak 
magnitude  of  the  displacement  and  velocity  response  of  the 
structural  system.  Expressing  /  in  the  orthonormal  basis  of 
Eq.  (18)  is  approximate  to  the  extent  that /can  be  represented 
by  a  truncated  set  of  eigenvectors.  Expansion  of  /  in  the 
eigenvector  basis  makes  interpretation  of  the  underlying  phys¬ 
ics  much  more  transparent. 

B.  Approximate  Cost  Function 

Equation  (16)  can  now  be  explicitly  stated  in  terms  of  struc¬ 
tural  parameters,  two  scalar  gains  and  the  assumed  modal- 
force  coefficients  y.  Substituting  Eqs.  (19)  and  (14)  into  (16) 
gives  the  following  cost  function 

+  (21) 

Thus,  the  optimal  tailoring  for  the  case  of  an  actuator  for  each 
controlled  mode  is  that  which  will  minimize  U^A“’^^U,  which 
is  inversely  proportional  to  the  frequency  cubed.  These  results 
are  discussed  more  fully  in  the  next  section  with  the  aid  of 
numerical  examples. 


Uniform  thickness 

t»  0.125  in. 
1-50  in. 


width  »  1  in.  2 

p  -  2.4093  E  -  4 

in. 

E-  10.3E6  Ib/in^ 

G-4.5E6  Ib/in? 

Fig.  1  Uniform  clamped-pioned  beam. 


V.  Results  and  Discussion 
The  previous  section  described  an  approximate  cost  func¬ 
tion,  which  minimizes  the  control  energy  necessary  to  achieve 
vibration  suppression.  The  objective  herein  is  to  minimize 
Eq.  (21)  by  structural  tailoring.  This  section  presents  results 
for  a  clamped-pinned  beam  and  a  cantilevered  truss  beam. 
Both  open-  and  closed-loop  simulations  are  presented  to 
demonstrate  the  effect  of  structural  tailoring,  liie  optimiza¬ 
tion  procedure  is  discussed  first  and  followed  by  the  numerical 
examples. 

A.  Structural  Tailoring  OptimizaUon  Procedure 
Minimization  of  Eq.  (21)  has  been  performed  by  tailoring 
appropriate  structural  design  variables,  such  as  member  thick- 
n^ess,  to  maximize  the  weighted  frequency  cubed  of  selected 
modes.  The  contribution  of  each  mode  to  the  objective  func¬ 
tion  is  (Ujyj/uy^)^.  ( Note  Uj  is  calculated  from  Eq.  pO)  with 
T  consisting  of  only  theyth  eigenvector.)  This  weighting  read¬ 
ily  shows  that  the  low-frequency  modes  contribute  most  to  the 
cost  index.  Hence,  usually  only  the  low-frequency  modes  need 
to  be  considered  in  the  tailoring  process. 

Constrained  optimization  was  performed  using  the  ADS'^ 
system  of  optimization  routines.  Eigenvalue  sensitivities  were 
computed  by  finite  differences.  Since  the  tailoring  procedure 
is  based  on  the  open-loop  eigenvalues  and  eigenvectors,  only  a 
finite-element  modeling  algorithm  to  compute  mass  and  stiff¬ 
ness  matrices,  a  real  eigenvalue  algorithm  for  eigenproblem 
analysis,  and  an  optimization  algorithm  for  constrained  func¬ 
tion  minimization  are  required.  The  following  results  have 
also  used  an  implicit  integration  algorithm  and  a  modal  con¬ 
trol  law  synthesis  algorithm  for  transient  simulation  of  the 

_ open-  and  closed-loop  systems.  All  simulations  have  been 

computed  in  spatial  coordinates. 


•  Total  mass  constrained  <  uniform  beam  mass 


<1  =0.211  <6  =0.133 

'2  =  0.169  <7  =  0.144 

<3  =0.115  tg  -0.139 

U  *0.0.500  tg  =0.118 

*5  =  0.102  t^Q  =  0.0715 

Fig.  3  Tailored  clamped-pinned  beam. 


Tim®-  (s)  Time,  (s) 

Fig.  2  Open4oop  response  of  uniform  beam.  Fig.  4  Open-loop  response  of  tailored  beam. 
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B.  Qimpcd-Pinned  BMm  Results 

The  beam  shown  in  Fig.  1  has  been  studied  to  detennine  the 
effects  of  structural  tailoring  on  the  dynamic  performance  and 
feedback  control  of  the  beam.  Ten  Timoshenko  beam  ele¬ 
ments  were  used  in  the  discrete  model.  The  beam  is  subjected 
to  a  step  load  at  the  center  of  10  lb  for  5  ms.  Figure  2  shows 
the  undamped  transient  response  of  the  uniform  beam  to  this 
loading  condition. 

The  thickness  of  each  element  was  tailored  to  minimize  the 
cost  index  of  Eq.  (21).  Only  the  first  three  modes  were  consid¬ 
ered  as  the  higher  modes  contributed  little  to  the  cost  function. 
An  active  constraint  in  the  minimization  procedure  was  that 
the  total  mass  of  the  tailored  beam  was  to  be  less  than  or  equal 
to  the  mass  of  the  uniform  beam.  Figure  3  shows  the  tailored 
beam  and  lists  the  thickness  of  each  element.  The  undamped 
transient  response  of  the  tailored  beam,  depicted  in  Fig.  4, 
shows  a  significant  reduction  in  vibration  amplitude. 

To  determine  the  effect  of  structural  tailoring  on  the  work 
done  by  the  actuators,  the  control  law  given  by  Eq.  (IS)  was 
used.  Five  modes  were  used  to  compute  the  optimal  control 
law  for  the  five  actuators  located  <is  shown  in  Fig.  1.  For 
simulation  purposes,  a  perfect  estimation  of  the  state  has  been 
assumed.  The  control  is  turned  on  at  0.1  s  and  must  reduce  the 
vibration  amplitude  to  less  than  0.10  in.  within  O.S  s  after 
active  control  begins.  For  the  examples  herein,  only  rate  feed¬ 
back  was  used,  i.e.,  a  =  0. 

Figure  5  shows  the  closed-loop  transient  response  of  the 
uniform  and  tailored  beams.  Both  beams  satisfy  the  preceding 
performance  requirement.  Figure  6  shows  a  reduction  of  37% 
in  total  control  work  for  the  tailored  beam.  Thus,  the  work  of 
the  actuators  can  be  significantly  reduced  for  some  actively 
controlled  structures  by  simply  tailoring  the  structure  to  mini¬ 
mize  a  function  inversely  proportional  to  the  vibration  fre¬ 
quency  cubed.  Although  such  tailoring  may  be  advantageous 
to  other  control  laws,  the  physical  based  control  law  presented 


—  Uniform 


Time,  (s) 

Fig.  5  Cloied-loop  response  of  uaiform  and  tailored  beams. 


herein  maximizes  the  effect  of  tailoring  to  reduce  control 
work. 

C.  Cantilever  Truss-Beam  Results 

The  truss  beam  shown  in  Fig.  7  has  been  used  to  demon¬ 
strate  that  even  large-order  systems  can  be  easily  tailored  to 
reduce  control  cost  using  the  method  proposed  in  this  study. 
The  three  longeron,  single-laced  truss  was  modeled  by  finite 
elements  with  one  Timoshenko  beam  element  from  joint-to- 
joint.  The  model  had  16S  nodes  and  990  degrees  of  freedom. 
All  members  are  tubular  with  the  inside  diameter  set  equal  to 
75%  of  the  outside  diameter.  Three  design  variables,  the  out¬ 
side  diameters  of  the  batten,  and  diagonal  and  longeron  ele¬ 
ments  are  used  to  tailor  the  structure.  In  addition  to  the  mass 
constraint  mentioned  previously,  the  first  pinned-pinned  fre¬ 
quency  of  each  element  was  constrained  to  be  more  than  100 
times  the  first  global  bending  frequency. 

Table  1  lists  the  truss-beam  properties  as  well  as  the  nominal 
and  tailored  tube  diameters.  The  nominal  outside  tube  diame¬ 
ters  were  chosen  such  that  the  first  pinned-pinned  beam  fre¬ 
quency  of  each  element  was  100  Hz.  The  beams  are  subjected 
to  a  step  load  at  two  points  as  shown  in  Fig.  7  of  10  lb 
magnitude  for  a  duration  of  100  ms.  Figure  8  shows  the 
undamped  response  of  the  uniform  and  tailored  beam.  Again, 
the  tailored  beam  shows  a  substantial  decrease  in  vibration 
amplitude. 

A  seven-mode  control  law  was  used  to  study  the  control  cost 
for  each  truss  beam  necessary  to  reduce  the  vibration  ampli¬ 
tude  to  0.025  in.  within  10  s  after  active  control  began.  Six 


Fig.  7  Cantilevered  truss  beam. 


0  .2  .4  .6  .8  1.0 

Time,  (s) 

Hg.  6  Controller  work  of  uniform  and  tailored  beams. 


Table  1  Truss-beam  properties 


Outside  tube  diameter  (in.)  Nominal  Tailored 

longeron  *0.789  1.717 

diagonal  1.707  1.284 

batten  0.918  0.640 

Material  properties 

p  =  1.5285  e -41b- sVin.< 

£  =  40.0  e  +  6  Ib/in.^ 

G  =  2.4  e  +  6  lb/in.7 

Element  lengths 

longeron  =>  44.25-  in. 
diagonal »  65.09  in. 
batten  =»  47.73  in. 
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Fig.  9  Closcd'loop  response  of  nominal  and  tailored  truss  beams. 


Time,  (s) 

Fig.  10  Controller  work  of  nominal  and  tailored  truss  beams. 

actuators  were  located  in  both  bending  planes  at  bays  27  ,  53, 
and  54.  One  additional  actuator  was  located  in  the  plane  of  the 
external  force  at  bay  28.  Active  control  was  initiated  5  s  after 
the  load  was  applied.  Figure  9  shows  that  both  truss  beams 
meet  the  performance  requirement;  however,  the  tailored 
beam  requires  56'Fo  less  total  actuator  work  as  shown  in  Fig. 
10.  Thus,  structural  tailoring  can  produce  substantial  reduc¬ 
tions  in  controller  energy.  Moreover,  the  structural  procedure 
presented  in  this  study  is  simple  enough  to  be  applied  to  large 
systems. 

VI.  Summary 

Structural  tailoring  of  actively  controlled  structures  has  sig¬ 
nificant  advantages  over  pure  feedback  control.  However, 


considerable  effort  is  required  to  incorporate  physical  insight 
as  part  of  the  synthesis  process  in  order  to  take  full  advantage 
of  combined  structural  tailoring  and  active  feedback  control. 
Results  herein  have  shown  that  a  set  of  physically  based 
weighting  matrices  in  the  LQR  performance  criterion  leads  to 
a  control  law  that  has  direct  physical  meaning.  This  physical 
understanding  of  the  control  law  leads  to  the  development  of 
the  proper  structural  tailoring  objective.  For  minimization  of 
controller  energy,  the  tailoring  objective  is  inversely  propor¬ 
tional  to  the  open-loop  vibration  frequencies  cubed.  Tliis  ob¬ 
jective  is  simple  enough  to  be  applied  early  in  the  structure/ 
control  design  process. 

Numerical  results  for  a  beam  subjected  to  an  external  dis¬ 
turbance  have  been  presented.  Structural  tailoring  of  the  beam 
thickness  reduced  the  control  energy  by  377o  from  that  of  the 
uniform  beam.  In  addition,  numerical  results  for  a  more  real¬ 
istic  space  truss  beam  were  presented.  Structural  tailoring  of 
the  truss  beam  reduced  the  actuator  work  by  56*1^0. 

Future  studies  are  needed  to  address  more  general  control 
laws  where  the  number  of  actuators  differs  from  the  number 
of  model  degrees  of  freedom.  Such  control  laws  will  result 
even  for  modal-space  control  when  actuator  dynamics  are 
considered.  In  this  case,  the  control  laws  will  produce  closed- 
loop  eigenvectors  that  differ  from  the  open-loop  eigenvectors. 
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Abatract 

Implementation  aapecta  of  control-structure  interac¬ 
tion  analysis  and  optimization  by  the  staggered  use  of 
single-discipline  analysis  modules  are  discussed.  The 
single-discipline  modules  include  structural  analysis,  con¬ 
troller  synthesis  and  optimization.  The  software  modu¬ 
larity  is  maintained  by  employing  a  partitioned  control- 
structure  interaction  analysis  procedure,  thus  avoiding  the 
need  for  embedding  the  single-discipline  modules  into  a 
monolithic  program.  A  software  testbed  has  been  con¬ 
structed  as  a  stand-alone  analysis  and  optimization  pro¬ 
gram  and  tested  for  its  versatility  and  software  modular¬ 
ity  by  applying  it  to  the  dynamic  analysis  and  preliminary 
design  of  a  prototype  Earth  Pointing  Satellite.  Experience 
with  the  in-core  testb^  program  so  far  demonstrates  that 
the  testbed  is  efficient,  preserves  software  modularity,  and 
enables  the  analyst  to  choose  a  different  set  of  algorithms, 
control  strategies  and  design  parameters  via  user  software 
interfaces.  Thus,  the  present  software  architecture  is  rec¬ 
ommended  for  adoption  by  control-structure  interaction 
analysts  as  a  preliminary  analysis  and  design'  tool. 

Introduction 

Computer  simulations  have  become  an  essential  part 
of  design  activities,  especially  for  the  interdisciplinary  de¬ 
sign  tasks  such  as  controller-structure  interaction  dynam¬ 
ics.  Traditionally,  computer  simulations  of  design  activ¬ 
ities  that  involve  only  a  specific  discipline,  i.e.,  aerody¬ 
namic  drag  and  lift,  structural  design,  thermal  problenu, 
etc.,  have  been  carried  out  with  a  tightly  packaged  com¬ 
puter  program.  As  an  example,  a  typical  structural  analy¬ 
sis  computer  program  has,  within  a  single  package,  several 
related  capabilities  such  as  linear  stress,  vibration,  buck¬ 
ling  and  perhaps  nonlinear  analyses. 

As  the  design  complexities  increase  to  include  sev¬ 
eral  disciplines  such  as  coupled  structural-thermal  desigri, 
aerodynamics-structural  coupling  and  control-structure  in- 
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teraction  (CSI)  design,  the  general  tendency  has  been  to 
embed  the  required  interaction  phenomena  into  an  existing 
single-discipline  analysis  and  design  program.  As  a  result, 
most  designs  which  consider  both  the  controller  and  struc¬ 
ture  as  design  variables,  see  Fig.  1,  have  been  performed 
using  an  ad  hoc  collection  of  discipline  specific  software 
modules.  Such  software  tools  were  originally  developed  for 
the  solution  of  single-discipline  problems  (e.g.  control  law 
synthesis,  finite  element  structural  modeling,  etc.).  The 
use  of  these  tools  has  required  specialized  interfaces  to  be 
developed,  e.g.  Refs.  1-2. 

Integration  of  such  single-discipline  analysis  codes  by 
means  of  a  common  data  base  manager  provides  for  imme¬ 
diate  usage  of  existing  software.  However,  the  program  is 
usually  hardwired  to  a  few  design  methods  thereby  losmg 
versatility.  Moreover,  the  high  cost  associated  with  re¬ 
peated  cold  starts  of  structural  analysis  or  controller  syn¬ 
thesis  packages  discourages  parameter  studies.  Most  im¬ 
portantly,  the  use  of  ad  hoc  single-discipline  programs  may 
d'istort  the  physics  associated  with  the  interaction  phe¬ 
nomenon  because  reduced  order  modeling  is  usually  em¬ 
ployed. 

The  present  paper  presents  an  architecture  for  the 
analysis  and  optimization  of  structure-controller  problems 
that  alleviates  some  of  the  computational  problems  asso¬ 
ciated  with  the  embedded  implementation  of  structures 
into  a  controls  package  or  vice-versa.  The  objectives  of 


Structure 


In  addition  to  the  controller  gams  Fj ,  F2 , 

the  structural  parameters  M,  0,  K,  and  B  can  be 

changed  to  meet  pertormance/robustness  requirements. 

Figure  1.  Integrated  Controller  and  Structure  Design 
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the  architecture  are  to  employ  existing  discipline  specific 
analysis  and  design  software  modules  in  a  loosely  coupled 
manner,  to  exploit  sparse  matrix  utilities  that  have  proved 
so  essential  for  efficient  implementation  of  many  engineer¬ 
ing  analysis  activities,  to  effect  efficient  data  transfer  bo- 
tween  structural  analysis  processors  and  control  synthesis 
algorithms,  and  to  maintain  versatility  in  the  optimiss^ 
tion  methodology.  The  present  version  of  the  architecture 
is  implemented  as  an  in-core  program  so  that  all  required 
structure,  control  and  optimisation  analyses  are  performed 
within  one  executable  program.  The  in-core  data  transfer 
between  the  control,  structure,  and  optimisation  modules 
facilitates  user  interfaces  for  new  implementations  of  solu¬ 
tion  algorithms  and  control  strategies.  A  distinctive  fea¬ 
ture  of  the  control-structure  interaction  transient  response 
analysis  capability  is  the  adoption  of  the  partitioned  solu¬ 
tion  approach  and  second-order  observers  as  described  in 
Refs.  3-5. 

The  basic  structure  and  controller  equations  are  re¬ 
viewed  with  emphasis  on  computer  implementation.  Con¬ 
ventional  CSI  simulation  is  shown  to  suffer  computational 
difficulties  that  can  be  substantially  reduced  by  the  pro¬ 
posed  software  architecture.  A  prototype  version  of  the 
architecture  and  its  capabilities  for  design  is  described.  In 
addition,  an  example  problem  is  presented  to  deirtonstrate 
the  interdisciplinary  controls  and  structures  design  of  an 
Earth  Pointing  Satellite.  Summary  remarks  and  future 
directions  for  controlled  structure  design  are  also  given. 


locations  whereas  6  and  Cl  represent  the  disturbance  locsr 
tions.  The  vector  q  is  the  generalised  displacement,  w  is  a 
disturbance  vector  and  the  vector  v  is  measurement  noise. 
In  Eq.  (lb),  s  is  the  measured  sensor  output.  The  matrix 
He  is  the  matrix  of  displacement  sensor  locations  and 
is  the  matrix  of  velocity  sensor  locations.  The  vector  v  is 
measurement  noise.  The  state  estimator  in  Eq.  (Ic)  may 
or  suqr  not  be  model  baaed.  The  superscript  *  and  *  denote 
the  estimated  states  and  time  differentiation  respectively. 
The  input  commimd,  u,  is  a  function  of  the  state  estimator 
variables,  ^  and  and  F|  and  Fj  are  control  gains.  The 
observer  is  governed  by  A,  the  state  matrix  representing 
the  plant  dynamics,  and  L,  the  filter  gain  matrix. 

There  exist  a  number  of  theoretical  and  computational 
issues  associated  with  the  design  of  control-structure  inter¬ 
action  systems  described  by  Eq.  (1).  Modeling  of  the  dy¬ 
namic  plant  and  model  reduction  for  control  are  still  unre¬ 
solved  issues.  Synthesis  of  control  force  gains  and  state  es¬ 
timators  for  multi-input  and  multi-output  MIMO  systems 
are  still  subject  to  experimental  validation.  Moreover,  sta¬ 
bility  and  performance  evaluation  of  the  CSI  system  de¬ 
sign  via  computer  simulation  have  become  a  necessity  for 
MIMO  design.  But  perhaps  the  meet  demanding  of  t.he 
above  issues,  from  a  computational  viewpoint,  is  the  in¬ 
tegrated  design  that  is  possible  by  simultaneousiy  tuning 
the  structure  and  the  controller  to  achieve  an  optimized 
design  (Fig.  1).  These  issues  are  discussed  in  relation  to 
the  need  for  a  new  software  architecture  for  CSI  design  in 
the  remainder  of  this  section. 


Implementation  Considerations 
A  typical  control-structure  interaction  system  can  be 
represented  as  shown  in  Fig.  2.  In  addition  to  the  con¬ 
trolled  structure  model,  an  observer  (or  state  estimator) 
is  used  to  estimate  the  full  structural  state  from  the  mev 
sured  output  s.  The  spatially  discrete  equations  of  motion 
for  control-structure  interaction  systems  may  be  described 
by 

Structure:  o)  Mq  +  Dq  +  Kq  =  f  +  Bu  +  Gw 

q(0)  =  qo,  4(0)  =  4. 


Modeling  Issues 

Development  of  the  dynamic  model  of  the  plant  or 
structure  has  been  the  subject  of  much  research.  Although 
finite  element  based  models  donoinate  structural  analysis, 
their  role  in  the  study  of  control-structure  interaction  anal¬ 
ysis  should  be  considered  from  an  implementation  view¬ 
point.  To  thb  end,  the  following  paragraphs  describe  pre¬ 
vailing  practices  in  control  system  design.  For  controlled 
structures,  it  is  shown  that  the  finite  element  based  struc¬ 
ture  models  lead  naturally  to  finite  dimensional  CSI  mod¬ 
els. 


Sensor  Output:  b) 
Estimator:  e) 

Control  Force:  d) 
where 


f  aHx-l-V 

S  =  Ax  -h  Ef  +  flu  +  L(s  -  Hx) 
x(0)  ==  0 
u  =  -Fx 


(1) 


1 

H  =  [H,  H,l,  F  =  (F.  F,1 


The  structure  model  consists  of  the  mass  matrix  M,  the 
damping  matrix  D,  and  the  stiffness  matrix  K.  The  state 
independent  applied  forces  to  the  structure  are  given  by  f. 
B  and  fl  represent  the  input  infiuence  matrix  for  actuator 


Figure  2.  Control  Structure  Interaction  System 
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X  S;  A<X 


(3) 


The  need  for  designing  controilen  for  coupied  MIMO 
systems  prompted  the  development  of  modem  control  the¬ 
ory.  In  modem  control  theory,  the  stote-spece  differentiel 
equ&tions  are  used  directly  to  design  the  controller.  Not 
only  does  modem  control  theory  produce  a  more  computa¬ 
tionally  attractive  controller  design  approach,  but  it  also  la 
advantageous  in  that  internal  couplings  in  the  system  are 
not  obscured  by  the  classical  input-output  model.  Thus, 
modem  control  theory  is  quite  amenable  to  structural  con¬ 
troller  design. 

Within  modem  control  theory,  there  exist  two  distinct 
modeling  methods;  distributed  parameter  control  theory 
and  discrete  paramev^r  control  theory  In  distributed  pa¬ 
rameter  control,  an  intinite  dimen^ionul  state  space  is  as¬ 
sumed.  Partial  differentikl  equations  and  integral  equa¬ 
tions  are  typically  employed  in  distributed  parameter  con¬ 
trol.  In  discrete  parameter  control,  a  finite  dimensional 
state  space  is  assumed  to  be  'upresented  by  ordinary  dif¬ 
ferential  equations.  Distributed  parameter  control  theory 
can  be  difficult  to  implement  on  structural  systems  be¬ 
cause  distributed  parameter  models  are  difficult  to  derive 
except  for  the  simplest  of  structural  geometries  such  as 
beams  and  plates.  Also,  the  computations!  implementa¬ 
tion  of  distributed  parameter  control  theory  is  still  in  a 
developing  state,  whereas,  with  dlKrete  parameter  control 
theory,  numerous  advances  in  equation  solution  techniques 
have  been  made. 

Discrete  parameter  modeling  within  the  framework  of 
modem  control  theory  leads  naturally  to  the  use  of  finite 
element  based  structural  models.  Many  of  the  existing 
ordinary  differential  equation  solution  techniques  for  con¬ 
trols  and  structures  may  be  used  if  certain  propertia  of 
the  coupled  equations  are  preserved.  Moreover,  the  force 
vectors  on  the  right  hand  side  of  Eq.  (la)  can  consist  of 
body  forces,  surface  forces  and  external  point  forces.  The 
ability  to  handle  such  a  wide  variety  of  forces  allows  the  dis¬ 
placement  based  finite  element  equations  to  be  employed 
in  the  study  of  fluid-structure,  thermal-structure,  control- 
structure  and  many  other  interaction  problems.  For  the 
study  of  control-structure  interaction,  discrete  points  on 
the  structure  may  be  chosen  for  control  action, 

Bu  =  B(-Fjq  -  Faq)  (2) 

where  the  input  influence  matrix  B  determines  the  degrees- 
of-freedom  directly  affected  by  control  actions,  and  u  is  a 
vector  of  actuator  control  commands.  For  most  practical 
control-structure  interaction  systems,  the  number  of  con¬ 
trol  forces  is  much  less  than  the  number  of  system  degrees 
of  freedom.  This  fact  has  been  er^^loited  in  the  present 
simulation  algorithms. 

Equation  (la)  represents  a  controlled  structure  which 
possesses  the  same  attractive  computational  properties  as 
open-loop  structural  simulation  does  provided  the  state 
dependent  control  interaction  force  is  maintained  on  the 
right  hand  side  of  the  second-order  equations.  As  shown 
in  Refs.  3-S,  the  conventional  simulation  approach  which 
converts  Eq.  (1)  to  a  first-order  state  space  representation 


where, 

[-M-‘(K  +  BF,)  -M-‘(D  +  BF, )]’*“{?} 

needlessly  destroys  the  computational  features  of  the  ma- 
trieec  M, D,  and  X.  The  ‘cures  of  dimttuionalitif  is  aggrv’ 
vated  by  the  first-order  representation  in  Eq.  (3)  where  in 
addition  to  doubling  the  number  of  equations,  the  sparsity 
and  symmetry  of  the  coefficient  matrices  is  lost.  To  cir¬ 
cumvent  the  dimensionality  problems  with  finite  element 
based  n.odels,  reduced  order  models  for  the  structure  are 
typically  constructed  using  a  truncated  modal  based  real¬ 
isation. 

Consider  the  generalized  coordinates  p  where 

q  =  Tp;  dim  (p)  <  dim  (q)  (4) 

and  T  is  a  matrix  consisting  of  a  reduced  set  of  basis  vu- 
tors.  IVansforming  (la)  with  (4)  yields 

T^MTp  +  T^'DTp  +  T^’KTp  =  T^Bu  (5) 

In  general,  the  coefficient  matrices  of  Eq.  (5)  may  not 
be  sparse,  however,  if  T  is  chosen  to  be  a  reduced  set  of 
eigenvectors  from  the  eigenvector  matrix  9  lot  the  real- 
symmetric  eigenvalue  problem 

(K  -  MA)»  =  0 

then,  the  transformation  yields 

p  +  T^'DTp  +  Ap  =  T’^Bu  (6) 

For  the  special  case  when  T^DT  is  diagonal,  the  trans¬ 
formation  not  only  reduces  the  model  size,  but,  simultane¬ 
ously  maximizes  the  coefficient  matrix  sparsity.  If  /  of  the 
total  N  eigenvectors  are  chosen,  Eq.  (6)  is  reduced  from 
N  to  /  equations  in  second-order  form  or  to  2l  equations 
in  the  first-order  form 

[.^.XJ’bFjT  -T^(D  +  BFs)T  = 

(7) 

For  many  applications,  the  reduced  order  model  in  Eqs. 
(6)  or  (7)  is  sufficient  for  synthesis  and  simulation  studies. 
However,  for  structures  characterized  by  high  modal  den¬ 
sity  m  the  bandwidth  of  interest,  even  the  first-order  form 
becomes  computationally  intensive.  Hsnee,  the  second- 
order  form  of  the  CSI  finite  dimensional  models  is  preferred 
for  control-structure  interaction  studies.  The  second-order 
form  also  simplifies  the  implementation  aspects  by  treat¬ 
ing  the  control  and  structure  interaction  terms  as  external 
disturbances.  Similar  arguments  can  be  made  for  the  esti¬ 
mator  model  in  Eq.  (Ic).  The  implementation  of  second- 
order  estimator  models  in  Refs.  3-5  shows  significant  com¬ 
putational  advantages  by  treating  the  interaction  terms  as 
external  disturbances. 
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from  th«  above  diKunion,  It  is  seen  that  tbe  finite 
element  analysis  module  and  tbe  control  synthesis  mod* 
ules  have  equal  roles  in  the  study  of  CSL  hilaintainint 
the  second-order  form  of  the  differential  equations  for  the 
structure  model  (and  the  estimator  model  if  possible)  sim* 
plifies  the  implementation  of  CSl  software  by  partitloninf 
the  structure  and  control  computatioiw.  In  adifftion,  the 
level  of  model  reduction  prior  to  simulation  may  be  re¬ 
duced  since  it  becomes  unnecessary  to  embed  a  first  o^ 
der  state  model  of  the  structure  into  a  controls  simula¬ 
tion  packace.  The  implementation  of  CSl  desiipi  software 
should  make  finite  element  structural  analysis  and  control 
synthesis  available  within  the  same  profram. 

Integrated  Design  Issues 

In  addition  to  the  modeling;  issues  above,  the  present 
software  architecture  has  been  driven  by  the  distinct  dif¬ 
ferences  between  CSl  analysis  and  design.  Design  issues 
involve  not  only  parameter  studies  of  the  controller  but 
also  parameter  studies  of  structural  variables.  Thus,  the 
need  exists  to  perform  both  structural  and  controller  cal¬ 
culations  in  a  repetitive  manner. 

To  date,  most  designs  which  consider  both  controls  and 
structure  design  variables  have  been  performed  using  dis¬ 
cipline  specific  software  modules.  The  use  of  these  tools 
has  requires  a  database  to  transfer  data  from  one  module 
to  the  next  as  shown  in  Fig.  3.  The  architecture  of  Fig.  3 
works  well  for  the  analysis  of  CSl  systems,  provided  model 
reduction  issues  are  overcome,  since  the  structure  model 
remains  constant.  The  data  base  architecture  also  works 
well  for  classical  control  design  where  the  plant  remains 
fixed  and  the  controller  parameters  are  optimised.  How¬ 
ever,  for  integrated  controller/structure  design,  the  struc¬ 
ture  model  changes  repeatedly.  In  this  case  the  data  base 
would  need  to  be  rewritten  for  every  structural  parameter 
change.  The  implementation  of  CSl  software  indicated  in 
Fig.  3  greatly  hinders  true  interdisciplinary  design. 

To  alleviate  some  of  the  computational  problems  asso¬ 
ciated  with  integrated  design  of  structures  and  controllers, 
an  in-core  architecture  is  proposed  as  shown  in  Fig.  4. 
This  architecture  permits  ail  data  to  be  shared  between 
the  control,  structure  and  optimisation  software.  B  r  hav¬ 
ing  ready  access  to  the  data  from  all  disciplines  in  one  exe¬ 
cutable  program,  repeated  calculations  pose  no  difficulties. 
In  fact,  the  optimizer  can  govern  the  fiow  of  calculations 
without  the  need  to  rewrite  a  data  base  when  the  problem 
objectives  or  constraints  change. 

Many  of  the  structure  and  controller  results  calculated 
for  the  initial  set  of  design  variables  remain  constant  dur¬ 
ing  the  design  process.  The  proposed  software  architecture 
does  not  require  cold  starts  of  the  structure  or  control  soft¬ 
ware  modules.  Instead,  control  and  structure  calculations 
from  the  previous  set  of  design  variables  are  continuously 
available  through  the  in-core  architecture.  The  availability 
of  results  from  previous  iterations  of  the  optimizer  greatly 
reduces  the  computations  required  during  integrated  de¬ 
sign  parameter  studies. 


Other  advantages  exist  in  using  the  proposed  architec¬ 
ture  versus  the  conventional  data  base  approach.  First, 
the  computational  speed  can  be  improved  using  in-core 
data  tracer  (i.e.  common  blocks  instead  of  data  bases). 
Coupling  the  !nput/output  time  savinp  with  algorithms 
that  exploit  matrix  sparsity  and  the  second-order  form  of 
structures  equations  enable  moderate  aise  problems  to  be 
solved  routinely.  Second,  the  new  architecture  requires 
engineers  and  Kientists  from  both  controls  and  f '  .-uctures 
discipiinsa  to  work  more  closely.  Since  they  both  use  the 
same  software  tool,  a  conducive  software  environment  ex¬ 
ists  for  exploring  interdisciplinary  design  problems.  Fi- 
naily,  the  in-core  architecture  permits  much  more  fiexibit- 
ity  to  implement  new  concepts  into  software. 

Although  the  available  memory  (virtual  memory)  of 
new  computers  has  grown  dramatically  in  recent  years, 
some  very  large  problems  must  still  be  solved  out-of-core. 
Data-base  type  design  codes  will  continue  to  be  needed  to 
handle  very  large  problems  for  the  foreseeable  future.  The 
proposed  architectme  is  targeted  for  research  studies  of 
design  methodology  for  small  to  moderate  size  problems. 
However,  as  multiple  instruction  multiple  data  (MIMD) 
computers  become  readily  available  to  the  research  and 
design  community,  the  in-core  architecture  will  soon  be 
amenable  to  quite  large  problems. 


Figure  3.  Conventional  Architecture  for  Controlled 
Structure  Design 


Figure  4.  New  Architecture  for  Controlled 
Structure  Design 
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Prototype  CSI  Design 
Software  System 

A  prototype  code  celled  Controlled  Structure  Simulfr> 
tion  Softwere  (C5*)  has  been  developed  using  public  do¬ 
main  software  to  implement  the  in-<ore  architecture  shown 
in  Fig.  4.  The  key  feature  sought  !n  choosing  the  software 
is  the  availability  of  source  code  which  could  be  modified 
to  permit  in-<ore  data  transfer  among  the  different  pro¬ 
grams.  There  exist  many  other  possible  choices  for  the 
optimiser,  structural  analysis  and  control  synthesis  than 
the  ones  presented  herein. 

The  following  sections  describe  key  features  of  each 
moduie  usen  in  CS*.  It  is  noted  that  the  executive  pro¬ 
gram  is  simply  one  that  tests  input  data  to  determine 
whether  analysis  or  design  is  to  be  performed.  If  design 
is  to  be  performed,  the  program  fiow  is  governed  by  the 
optimization  module.  Otherwise,  the  appropriate  controls 
or  structural  analysis  is  performed.  User  modules  can  be 
easily  added  to  CS*  which  make  the  code  quite  useful  as 
a  software  testbed. 

Optimisation  Module 

The  optimization  path  uses  the  Automated  Design 
Synthesis  (ADS}  system  of  subroutines  (Ref.  6).  The 
AOS  system  allows  for  constrained  function  minimization 
by  the  method  of  feasible  directions,  various  penalty  func¬ 
tion  methods  as  well  as  other  techniques.  The  wide  variety 
of  methods  allows  the  user  to  tailor  the  optimizer  to  the 
problem  at  hand.  Since  there  exist  many  good  optimizers 
in  the  literature,  the  choice  of  ADS  has  been  made  based 
on  availability  of  the  source  code  rather  than  technical  con¬ 
siderations. 

A  number  of  solution  strategies  may  be  chosen  within 
the  ADS  system  to  find  the  minimum  of  a  constrained  func¬ 
tion  both  by  nonlinear  programming  and  sequential  linear 
programming  techniques.  The  advantage  of  nonlinear  pro¬ 
gramming  minimization  methods  is  the  simplicity  of  the 
optimization  procedure  from  the  user’s  viewpoint.  How¬ 
ever,  for  large  numbers  of  design  variables,  optimization  by 
nonlinear  programming  can  become  prohibitively  expen¬ 
sive.  An  alternative  method  for  optimization  of  functions, 
is  sequential  linear  programming  as  proposed  in  Rjfs.  7- 
10.  Sequential  linear  programming  is  quite  robust  to  large 
numbers  of  design  variables,  however,  some  pre-processing 
(linearization)  of  the  optimization  problem  is  required  on 
the  user’s  part.  Since  simplicity  for  the  user  is  a  key  con¬ 
sideration  in  choosing  the  optimiser,  nonlinear  program¬ 
ming  methods  are  frequently  employed  whereby  the  user 
needs  only  to  supply  routines  for  evaluation  of  the  objec¬ 
tive  function  and  constraints  and  perhaps  their  gradients. 
The  objective  function  and  constraints  are  usually  depen¬ 
dent  on  results  obtained  from  the  structural  and/or  control 
processors. 

One  of  the  most  important  (and  expensive)  aspects  of 
optimization  is  the  calculation  of  objective  function  and 
constraint  gradients  with  respect  to  the  design  variables. 
For  simultaneous  structure  and  controller  design,  the  ob¬ 
jective  function  and  constraints  may  involve  calculations  of 
eigenvalues  and  eigenvectors,  closed-loop  frequencies  and 


damping,  total  weight  of  the  structure  and  actuators,  ro¬ 
bustness  measures,  and/or  transient  response  quantities. 
There  is  considerable  on-going  reseerch  into  graulient  cal¬ 
culation  of  dynamic  systems  as  found  for  example  in  Refa. 
11-16.  The  calculation  of  gradient  information  for  use  by 
ADS  m^  be  either  analytic,  semi-analytic,  or  by  finite  dif¬ 
ferences.  Although  some  analytic  or  semi-analytic  gradient 
information  may  be  available,  the  need  for  finite-difference 
calculation  of  gradients  usually  arises  for  integrated  control 
and  structure  design.  U  all  gradient  informatioa  is  to  be 
computed  by  finite  differences,  the  ADS  program  provides 
an  automatic  utility  for  this  purpose. 

Structural  Modeling  and  Analysis  Module 

Structural  finite  element  modeling,  real-symmetric 
eigenvalue  analysis,  and  transient  response  calculations 
are  performed  with  code  called  Linear  Analysis  of  Sparse 
Structures  (LASS).  LASS  was  developed  to  permit  finite 
dimensional  models  of  spacecraft  to  be  easily  developed 
and  manipulated.  Although  a  number  of  Imear  finite 
element  programs  for  modeling  of  structures  exist  (e.g. 
NASTRAN*'  and  EAL‘*),  the  computational  overhead  of 
these  large  codes  and  the  lack  of  source  code  to  implement 
the  in-core  data  architecture  led  to  development  of  LASS. 

LASS  uses  a  sparse  matrix  utility  with  a  skyline  data 
structure  for  efficient  manipulation  of  matrix  vector  equa¬ 
tions.  The  skyline  data  structure  stores  fewer  matrix  ele¬ 
ments  than  a  banded  storage  scheme  yet  the  data  struc¬ 
ture  is  still  preserved  after  matrix  factorization.  Linear 
beam  elements  (both  Euler  and  Timoshenko)  are  used  to 
assemble  mass  and  stiffness  matrices  for  structures  of  ar¬ 
bitrary  geometry.  Assemblage  of  the  structural  mass  and 
stiffness  matrices  is  readily  performed  by  storage  of  the 
transformed  element  matrices  into  global  arrays.  A  util¬ 
ity  for  scaling  structural  properties  is  included  to  permit 
optimization  with  structural  design  variables  such  as  the 
radius  of  tubular  beams. 

Three  analysis  paths  exist  in  LASS;  static  analy¬ 
sis,  transient  response  analysis  and  eigenvalue/eigenvector 
analysis.  Static  analysis  capabilities  are  limited  to  the  dis- 
^.acement  response  determination  of  the  structure  subject 
to  an  applied  load.  Any  combination  of  forces  and  mo¬ 
ments  are  permitted. 

Transient  response  capabilities  include  open-loop  and 
closed-loop  response  simulation  due  to  time-variant  distur¬ 
bance  forces.  The  algorithms  presented  in  Refs.  4  and  5 
are  implemented  for  integration  of  the  ordinary  differen¬ 
tial  equations.  The  sparse  matrix  utility  and  the  implicit 
integration  technique  permit  direct  integration  of  the  con¬ 
trolled  structure  without  model  reduction.  Thus,  transient 
response  calculations  can  be  performed  without  an  inter¬ 
mediate  eigen-solution  to  obtain  a  reduced  set  of  basis  vec¬ 
tors.  However,  the  capability  does  exist  in  LASS  to  use  a 
reduced  order  modal  model  for  transient  response  simula¬ 
tion.  Note  that  software  modularity  is  a  key  featiue  of  the 
proposed  testbed  architecture,  inclusion  of  new  structural 
models,  new  control  laws  or  new  integration  algorithms 
can  be  easily  performed.  The  modular  style  of  the  tran¬ 
sient  response  utility  makes  C5’  a  useful  software  testbed. 
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Solution  of  the  renl*iynunetric  eigenvilue  problem  ie 
performed  by  a  tub^paee  iteration  technique.  The  Jacobi 
method  is  used  to  find  ail  the  eigenvalues  of  the  subspaee. 
The  eigen-solution  algorithms  also  use  the  skyline  data 
structure.  Eigenvalue  convergence  tolerances  can  be  con¬ 
trolled  by  the  user.  In  addition,  during  optimisation,  the 
previous  eigenvectors  can  be  used  as  the  initial  subspaee 
vectors  to  increase  the  convergence  rate.  Model  reduction 
is  virtually  inevitable  for  controller  synthesis.  Thus,  a  sub¬ 
set  of  the  smallest  eigenvalues  and  associated  eigenvectors 
are  usually  computed  for  model  based  controller  design. 
The  control  design  capability  of  CS*  is  discussed  next. 

Control  Synthesis  and  Analysis  Module 

Control  synthesis  is  performed  using  the  Optimal 
Regulator  Algorithms  for  the  Control  of  Linear  Systems 
(ORACLS)^*  library  of  linear  algebra  subroutines.  ORA- 
CLS  is  a  collection  of  software  for  linear-quadratic-gaussian 
(LQG)  control  law  design.  Typical  linear  algebra  problems 
such  as  matrix  operations,  solution  of  Liapunov  and  Ric- 
cati  equations,  eigenvalue/ vector  computations  and  calcu¬ 
lation  of  the  matrix  exponential  can  be  performed  using 
ORACLS. 

The  primary  driver  in  choosing  the  ORACLS  routines 
was  the  availability  of  source  code.  Other  control  synthe¬ 
sis  packages  such  as  MATROC*  could  be  used  to  perform 
similar  matrix  algebra  operations,  however,  the  ease  with 
which  data  transfer  can  be  achieved  with  the  in-core  ar¬ 
chitecture  to  and  from  ORACLS  make  it  ideally  suited  for 
use  in  the  CS*  testbed.  One  of  the  goals  in  developing 
the  CS*  testbed  is  to  provide  a  conducive  environment  for 
both  structural  and  control  engineers  to  work  and  thereby 
promote  interdisciplinary  research.  The  combination  of 
ADS,  LASS  and  ORACLS  seems  to  meet  this  goal. 

Illustrative  Example: 

Geostationary  Platform 

The  solution  procedures  and  design  methodology  pre¬ 
sented  in  Refs.  3-S  and  21  have  been  implemented  in  the 
software  testbed  described  in  Section  3.  In  this  Section, 
the  design  of  a  geostationary  platform,  is  presented  to 
demonstrate  the  versatility  of  the  proposed  software  archi¬ 
tecture.  Ail  of  the  numerical  results  were  produced  luing 
the  CS^  code.  Calculations  have  been  performed  on  the 
Alliant/FX  MIMD  computer,  the  SUN  3/60  workstation 
and  the  ^-Vax  workstation.  On  each  computer,  calcula¬ 
tions  have  been  performed  in  double  precision  using  the 
Fortran  language. 

A  realistic  example  of  spacecraft  being  studied  for  ac¬ 
tive  vibration  control  is  the  Earth  Pointing  Satellite  (EPS), 
shown  in  Fig.  5,  which  is  a  derivative  of  a  geostation¬ 
ary  platform  proposed  for  the  study  of  Earth  Obeerw 
tion  Sciences”.  Two  flexible  antennas  are  attached  to  a 
truss  bus.  Typical  missions  involve  pointing  one  antenna 
to  earth,  while  tracking  or  scanning  with  the  other  an¬ 
tenna.  The  EPS  structure  possesses  the  common  feature 
of  a  number  of  proposed  spacecraft,  namely,  several  quite 
flexible  appendages  axe  attached  to  a  relatively  rigid  bus 


structure.  This  type  of  structure  is  difficult  to  control  since 
the  attitude  control  system  is  usually  located  on  the  bus. 
The  attitude  control  system  location  may  render  many  of 
the  flexible  appendage  modes  uncontrollable.  The  follow¬ 
ing  section  describes  an  integrated  structure  and  control 
design  for  the  EPS  system  which  includes  additional  actu¬ 
ators  for  flexible  body  vibration  suppression. 

I^S  Model  Description 

There  are  six  basic  components  that  make  up  the  EPS 
structure:  the  truss,  a  15  m  antenna,  a  7.5  m  antenna,' 
the  15  m  antenna  to  truss  attachment,  the  7.5  m  antenna 
to  truss  attachment  and  the  center  of  gravity  attitude  con¬ 
trol  system  support  structure.  The  truss  has  a  three  meter 
square  cross  section.  It  consists  of  51  mm  diameter  by  1.50 
mm  wail  thickness  graphite  epoxy  tubes.  The  modulus  of 
elasticity  and  mass  density  of  the  tubes  are  275.9 10*  N/M* 
and  3250.0  Kg/M*,  respectively.  A  total  of  135  beam  ele¬ 
ments  form  the  truss. 

The  15  m  antenna  is  a  simple  design  which  exhibits 
dynamic  structural  deformations  which  are  characteristic 
of  large  space  antennas.  The  antenna  has  12  ribs  which  ra¬ 
diate  from  the  center.  The  ends  of  the  ribs  are  connected 
by  hoop  elements  as  shown  in  Fig.  5.  Graphite  tube  di¬ 
ameters  and  thicknesses  are  the  same  as  those  used  for  the 
truss  for  the  nominal  design.  However,  nonstructural  mass 
which  simulates  the  antenna  reflector  is  included.  The  non¬ 
structural  mass  is  assumed  to  be  twice  the  weight  of  the 
antenna  members.  The  7.5  m  antenna  has  a  geometrically 
similar  design  to  the  15  m  design.  Again,  for  the  nominal 
design,  the  tube  diameters  are  the  same  as  used  on  the 
truss.  Nonstructural  mass  is  also  assumed,  for  the  7.5  m 
antenna,  to  be  twice  the  weight  of  the  antenna  members. 

The  antenna  to  truss  connections,  for  both  antennas, 
are  made  by  four  beam  elements  with  the  same  nominal 
material  and  tube  properties  as  the  truss  members.  The 
attitude  control  system  is  supported  at  the  center  of  grav¬ 
ity  (CG)  of  the  nominal  design  by  eight  beam  elements. 
The  attitude  control  system  support  is  also  constructed 
from  the  same  tubes  as  used  in  the  truss. 

Three  torque  actuators  are  located  at  the  CG  each  with 
an  assumed  mass  of  50  Kg.  This  yields  a  total  vehicle 
mass  of  1027.95  Kg.  The  mass  is  divided  into  548.32  Kg 
of  structural  mass,  150  Kg  of  attitude  control  mass,  and 


Figure  5.  Earth  Pointing  Satellite  Structure 
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329.03  Kg  of  noiutructursl  mui  on  the  antennu.  The 
finite  element  model  representing  the  EPS  consists  of  570 
degrees  of  freedom. 

Table  1  lists  the  first  20  frequencies  for  the  nominal 
EPS  structure.  Torsion  and/or  bending  of  both  the  IS 
m  and  7.5  m  antennas  dominate  the  flexible  body  motion 
in  modes  7  through  20.  For  example,  the  first  flexible 
mode,  mode  7,  is  torsion  of  the  15  m  antenna.  Modes  with 
repeated  frequencies  (e.g.  mode  pairs  11-13,  15-16,  and 
17-18}  involve  bending  of  the  antennas  and  occur  in  pairs 
due  to  the  symmetry  of  the  antennas. 

Table  1.  EPS  Vibration  Frequencies  (Ha.) 


Mode  No. 

Frequency 

(1-6) 

0.000 

(7) 

0.242 

(8) 

0.406 

(9) 

0.565 

(10) 

0.656 

(11,12) 

0.888 

(13) 

1.438 

(14) 

1.536 

(15,16) 

1.776 

(17,18) 

3.026 

(19) 

3.513 

(20) 

3.531 

tegrated  control  and  structure  design  which  seeks  to  lower 
the  vibrational  response  of  the  EPS  subject  to  some  addi¬ 
tional  constraints. 

In  the  optimization  based  design,  20  design  variables 
have  been  used.  Eight  design  variables  are  used  for  the 
structure,  6  design  variables  for  angular  rate  control  at 
the  CG  and  6  design  variables  for  additional  flexible  body 
actuators.  The  structural  design  variables  consisted  of  the 
outside  tube  diameters  with  the  inside  diameter  set  equal 
to  75  percent  of  the  outer  diameter.  A  lower  bound  of 
0.025  m  was  set  for  the  minimum  allowable  value  for  the 
structure  design  variables.  The  truss  was  divided  into  four 
nearly  equal  sections,  the  first  section  being  nearest  the 
15  m  antenna  and  the  fourth  section  nearest  the  7.5  m 
antenna.  The  structural  design  variables  df  are 

’  d,  =  diameter  of  truss  members,  section  1 
d,  =  diameter  of  truss  members,  section  2 
d«  =  diameter  of  truss  members,  section  3 
d«  =  diameter  of  truss  members,  section  4 
dt  =  diameter  of  15  M  antenna  members 
d,  =  diameter  of  7.5  M  antenna  members 
d,  =  diameter  of  antenna  to  truss  connections 
.  d|  =  diameter  of  members  between  the  CG  and  truss 

The  control  design  variables  directly  specify  the  feed¬ 
back  gain  matrices.  The  attitude  controller  located  at  the 
center  of  gravity  of  the  nominal  design  was  used  for  dam^ 
ing  augmentation  with  a  control  law  of  the  form 


EPS  Integrated  Design  Formulation 

A  small  disturbance  force  was  applied  to  the  nominal 
EPS  system  in  the  form  of  a  reboost  maneuver.  The  force 
acted  at  the  center  of  gravity  in  the  Y-axis  direction  for  0.1 
seconds  at  a  10  N  force  level  and  from  0.1  to  0.2  seconds 
the  force  level  was  -10  N.  The  disturbance  was  removed 
after  0.2  seconds.  Figure  6  shows  the  angular  response 
about  the  X-axis  of  the  15  m  antenna.  A  small  amount 
of  passive  damping  was  assumed  (D  =  0.0002  K).  The 
vibrational  resporue  produced  more  than  4.5  p  radians  of 
RMS  pointing  error  due  to  this  small  reboost  disturbance. 
Although  many  modes  participate  in  the  flexible  body  re¬ 
sponse,  this  particular  reboost  maneuver  strongly  excites 
modes  near  4  Hz.  The  following  paragraphs  present  an  in- 
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Figure  6.  EPS  Antenna  Pointing:  Open-Loop  Response 
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where  u,,  is  the  control  torque  vector  at  the  CG  location 


and  Ft,  is  a  (3X3)  positive  definite  matrix.  A  Cholesky 
form  of  the  matrices  is  employed,  such  that 

Fc,  =  Kfl  (9) 


where 
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To  design  a  flexible  body  control  system  for  vibration 
suppression  on  the  EPS  system,  actuators  were  added  to 
both  the  15  m  and  the  7.5  m  antenna  hoops.  On  each  hoop, 
groups  of  3  torque  actuators  were  located  at  90  degree  in¬ 
crements  around  the  hoop.  Thus,  a  total  of  24  actuators 
were  added.  These  actuators  were  assumed  to  have  col¬ 
located  feedback  of  the  angular  rate.  The  control  law  at 
point  p  on  the  15  M  antenna  was 


=  -F'‘qi‘ 


(10) 


where 


r” 


fdu  0  0  ■ 

0  d,,  0 

0  0  d„ 


Similarly,  the  control  law  at  point  p  on  the  7.5  M  an¬ 
tenna  was 

u;»  =  (11) 
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where 


r* 


dit  0  0  ■ 

0  dxt  0 

0  0  dto 


The  objective  ( J)  for  the  integrated  design  was  to  min¬ 
imise  the  RMS  control  force  required  over  a  10  second  time 
period 


J  »  ^  /“’[uf,u.,  +  X)(ui*  *‘uj*  +  uj-*  *'u;-*)l‘/»dr  (12) 

lU  JO 


Two  constraints  were  imposed.  The  first  constraint  (pt) 
was  that  the  total  mass  of  the  structure  and  actuators  wu 
to  be  less  than  1000  kg.  The  second  constraint  (pa)  was 
that  the  RMS  pointing  error,  as  measured  by  the  equation 
below,  was  to  be  less  than  0.5/r  radians. 


Pi  =  (total  mass/1000)  —  1  <  0 
p,  =  {RAfS,/0.iE  -  6)  -  1  <  0 


(13) 


Figure  7.  EPS  Design  Using  Controlled  Structure 
Simulation  Software 


where 

The  remaining  undefined  quantity  needed  to  perform 
the  integrated  structure  and  controller  design  is  the  mass  of 
the  actuators.  A  linear  relationship  between  the  feedback 
gain  matrices  and  the  actuator  mass  has  been  employed. 
First,  the  infinity  norm  of  the  gain  matrices,  F,„F“,F'’*, 
are  multiplied  by  a  worst  case  attitude  rate  (dma*)*  Subse¬ 
quently,  the  actuator  mass  is  based  on  an  empirical  relation 
between  actuator  torque  and  mass  per  unit  torque.  The 
actuator  mass  equation  assumed  in  this  study  is  summa¬ 
rized  as  follows: 

m.  =  ^(3  I  F„  loo  +12  I  F“  loo  +12  j  F'‘  U)e^,  (14) 
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where  the  mass  per  unit  torque  =  7=1  kg/(N-m)  and  Figu"  8-  EPS  Antenna  Pointing:  Closed-Loop  Response 
@max  =  1.7453  rad/s. 


EPS  Integrated  Design  Results 

The  flow  chart  shown  in  Fig.  7  shows  the  integrated 
design  path  using  CS*.  The  dominant  computational  bur¬ 
den  for  this  optimization  problem  is  associated  with  tran¬ 
sient  response  analysis  of  the  closed-loop  equations  to  com¬ 
pute  the  RMS  control  force  and  the  RMS  pointing  error. 
Since  gradient  information  was  computed  using  finite  dif¬ 
ference  equations,  20  function  evaluations  were  required 
for  each  iteration  of  the  optimizer.  The  EPS  integrated  de¬ 
sign  demonstrates  the  need  for  efficient  transient  response 
simulation  of  CSI  systems. 

Figure  8  shows  the  closed-loop  angular  response  about 
the  X-axis  of  the  IS  m  antenna  after  design  optimization. 
The  pointing  error  is  significantly  reduced  from  that  of 
the  open-loop  system  shown  .  Table  2  shows  the  nominal 
design  (open-loop),  the  initial  design  used  to  begin  the  op¬ 
timization,  and  the  final  optimization  results.  This  design 
required  20  iterations  of  the  optimizer.  The  RMS  control 
torque  was  reduced  from  an  initial  value  of  14.3  N-m  to 
2.88  N-m. 


Table  3  EPS  Optimization  Results 
Design  Variable  Nominal  Initial  final 
Member  Diameters 


1 

2 

3 

4 

5 

6 

7 

8 


0.051 

0.051 

0.031 

0.051 

0.051 

0.045 

0.051 

0.051 

0.054 

0.051 

0.051 

0.087 

0.051 

0.051 

0.056 

0.051 

0.051 

0.049 

0.051 

0.051 

0.050 

0.051 

0.051 

0.025 

Attitude  Control  Gairu 

9  0.0 

10  0.0 

11  0.0 

12  0.0 

13  0.0 

14  0.0 


31.6  2.96 

31.6  0.204 

31.6  0.661 

31.6  S.12 

31.6  6.61 

31.6  6.29 


15  m  Antenna  Gains 


15 

0.0 

70. 

16 

0.0 

70. 

17 

0.0 

70. 

5.73 

0.86 

4.66 


7.5  m  Antenna  Gains 


18 

0.0 

70. 

19 

0.0 

70. 

20 

0.0 

70. 

9.38 

23. 

6.71 
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Examination  of  the  cloeed-loop  responae  in  Fig.  8  indi* 
cates  that  modes  near  A  Hs.  still  dominate  the  vibrational 
behavior.  However,  the  optimised  design  reduced  the  ini¬ 
tial  vibration  amplitude  by  a  factor  of  two  as  compared  to 
the  open-loop  response.  The  optimised  structural  design 
reduced  the  “transfer  function*  amplitude  between  the  CG 
location  and  the  antenna  measurement  locatioiu.  Reduc¬ 
tion  of  the  “transfer  function*  amplitude  was  accomplished 
by  changing  the  mode  sh^>es  of  the  structural  system.  An 
alternative  design  approa^  is  presented  next. 

EPS  Integrated  Design  Results 

with  Initially  Tailored  Structure 

One  difficulty  with  optimisation  based  designs  is  the 
selection  of  an  initial  structural  design  to  start  the  opti¬ 
mizer.  If  the  initial  design  is  too  far  from  the  optimum, 
then  the  optimizer  may  require  a  large  number  of  itera¬ 
tions  before  convergence,  or  the  optimizer  may  converge 
to  a  local  minima  far  from  the  optimal  solution.  Thus,  de¬ 
sign  methodology  is  sought  to  choose  good  initial  designs 
to  start  the  optimizer. 

The  structural  tailoring  strategy  presented  in  Ref.  21 
was  developed  to  obtain  good  structural  designs  for  CSI 
systems  using  a  particular  form  of  the  control  law.  The 
control  law  cost  function  involved  minimizing  a  quadratic 
measure  of  controller  energy  and  vibrational  response.  The 
structural  tailoring  strategy  to  minimize  the  cost  func¬ 
tion  involved  minimizing  a  quantity  inversely  related  to 
the  open-loop  vibration  frequencies  of  the  structure. 

The  EPS  system  was  redesigned  using  structural  tai¬ 
loring  to  select  an  initial  set  of  structure  design  variables. 
Table  3  gives  the  vibration  frequencies  of  the  tailored  EPS 
design.  The  drst  flexible  mode  of  the  tailored  design  still 
•iivolves  torsion  of  the  15  m  antenna,  however,  the  fre¬ 
quency  has  been  increased  by  300  percent.  This  large  fre¬ 
quency  increase  occurred  by  stiffening  the  antenna  support 
truss  represented  by  design  variable  number  7.  The  15  m 
antenna  bending  modes  also  increased  in  frequency  for  the 
tailored  design. 

Table  3.  Nomioal  and  Tailored  EPS 
Vibration  Frequencies  (Hz.) 


Mode  No. 

Nominal 

Tailored 

(1-6) 

0.000 

0.000 

(7) 

0.242 

0.726 

(8) 

0.406 

0.800 

(9) 

0.565 

1.197 

(10) 

0.656 

1.229 

(11) 

0.888 

1,229 

(12) 

0.888 

1.277 

Table  4  shows  the  initial  tailored  design  used  to  start 
the  optimizer.  The  nominal  (open-loop)  design  and  the 
final  optimization  results  are  also  given  in  Table  4.  It  is 
noted  the  final  structi.ral  design  variables  changed  little 
from  the  initial  tailored  design.  The  closed-loop  response 
of  the  EPS  system  for  the  design  of  Table  4  is  quite  similar 
in  magnitude  to  the  response  given  in  Fig.  8. 


Table  4  EPS  Optimization  Results 
with  Structural  Tailoring 


Deaign  Variable 

Nominal 

Tailored 

£iual 

Member  Diametere 

1 

0.051 

0.025 

0.025 

2 

0.051 

0.025 

0.027 

3 

0.051 

0.025 

0.028 

4 

0.051 

0.025 

0.025 

5 

0.051 

0.070 

0.069 

6 

0.051 

0.031 

0.028 

7 

0.051 

0.216 

0.211 

8  0.051 

Attitude  Controi  Gains 

0.025 

0.025 

9 

0.0 

31.6 

28.43 

10 

0.0 

31.6 

29.44 

11 

0.0 

31.6 

29.50 

12 

0.0 

31.6 

28.68 

13 

0.0 

31.6 

26.28 

14 

0.0 

31.6 

8.21 

15  m  Antenna  Gains 

15 

0.0 

70. 

187. 

16 

0.0 

70. 

0.0 

17 

0.0 

70, 

39.0 

7.5  m  Antenna  Gains 

18 

0.0 

70, 

98.7 

19 

0.0 

70. 

191. 

20 

0.0 

70. 

48.3 

By  applying  the  structural  tailoring  methodology  of 
Ref.  21  to  compute  an  initial  design  for  the  optimizer  a 
70  percent  reduction  in  computational  cost  was  realized. 
This  is  shown  graphically  in  Fig.  d  by  the  number  of  iter¬ 
ations  the  optimization  required.  When  startmg  with  the 
nominal  structure  20  iterations  were  needed  for  conver¬ 
gence,  whereas  by  starting  with  the  tailored  design,  only 
6  iterations  were  needed.  Note  that  this  resulted  in  280 
fewer  objective  function  and  constraint  calculations  be¬ 
cause  gradient  information  was  computed  using  finite  dif¬ 
ferences.  These  results  indicate  that  design  methodology 
which  select  good  initial  designs  for  the  optimizer  in  con¬ 
junction  with  the  modular  closed-loop  simulation  proce¬ 
dures  adopted  for  the  present  study  yield  computationally 
efficient  tools  for  interdisciplinary  design  of  CSI  systems. 


Figure  9.  EPS  Control  Force  Optimization  History 
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Concludiog  Remarks 

A  software  testbed  has  been  implemented  as  a  stand¬ 
alone  analysis  and  optimisation  program  for  the  prelim¬ 
inary  design  of  control-structure  interaction  systems.  By 
employing  a  partitioned  control-structure  interaction  anal¬ 
ysis  procedure,  versatility  and  modularity  of  the  software 
has  been  maintained.  Implementation  of  the  testbed  has 
been  performed  using  an  in-core  data  base  approach  which 
permits  the  designer  great  freedom  in  developing  user  in¬ 
terface  programs.  The  shared  data  architecture  encourages 
interdisciplinary  design  by  both  control  and  structural  ex¬ 
perts. 

Numerical  results  for  a  realistic  geostationary  platform 
have  been  presented  which  demonstrate  some  of  the  cv 
pabilities  of  the  testbed  for  integrated  control  and  struc¬ 
ture  design.  It  has  been  shown  that  the  integrated  de¬ 
sign  of  controlled  structure  systems  differs  substantially  in 
implementation  than  the  individual  analysis  of  the  single- 
disciplines.  The  user  interfaces  in  the  software  testbed 
should  permit  development  and  verification  of  CSI  design 
methodology,  improved  algorithms  and  more  physical  in¬ 
sight  mto  unified  design. 

The  CSI  design  testbed  preswted  herein  addresses  the 
linear  time  invariant  class  of  controlled  structures.  Fu¬ 
ture  activities  must  involve  multi-body  dynamics  and  time 
variant  controller  design.  Nevertheless,  the  present  archi¬ 
tecture  should  be  invoked  where  possible  to  facilitate  in¬ 
tegrated  structure  and  controller  design.  In  addition,  the 
present  work  rndst  be  extended  to  permit  more  realistic 
simulation  of  experimental  testbeds  by  including  actuator 
and  sensor  dynamics,  filters,  discrete  time  sampling  and 
real  time  computations.  The  extension  of  CS*  for  simula¬ 
tion  of  experimental  testbeds  is  currently  underway. 
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Abstract 

A  general  form  for  the  first-order  representation  of  the  continuous,  second-order  linear 
structural  dynamics  equations  is  introduced  in  order  to  derive  a  corresponding  form  of 
first-order  continuous  Kalman  filtering  equations.  Time  integration  of  the  resulting  first- 
order  Kalman  filtering’ equations  is  carried  out  via  a  set  of  linear  multistep  integration 
formulas.  It  is  shown  that  a  judicious  combined  selection  of  computational  paths  eind  the 
undetermined  matrices  introduced  in  the  general  form  of  the  first-order  linear  structural 
systems  leads  to  a  class  of  second-order  discrete  Kalman  filtering  equations  involving  only 
symmetric,  sparse  N  x  N  solution  matrices.  The  present  integration  procedure  thus  over¬ 
comes  the  difficulty  in  resolving  the  difference  between  the  time  derivative  of  the  estimated 
displacement  vector  ( Jjx)  zmd  the  estimated  velocity  vector  (x)  that  are  encountered  when 
one  attempts  first  to  eliminate  (x)  in  order  to  form  an  equivalent  set  of  second-order  fil¬ 
tering  equations  in  terms  of  (^x).  A  partitioned  solution  procedure  is  then  employed  to 
exploit  matrix  symmetry  and  sparsity  of  the  original  second-order  structural  systems,  thus 
realizing  substardial  computational  simplicity  heretofore  thought  difficult  to  achieve. 

■*■  An  earlier  version  of  the  present  paper  without  numerical  experiments  was  presented  at 
the  AIAA  Guidance  and  Control  Conference,  Portaland,  Ore.,  20-22  August  1990,  Paper 
No.  AIAA  90-3387. 
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Introduction 


Current  practice  in  the  design,  modeling  and  analysis  of  flexible  large  space  structures 
is  by  and  large  based  on  the  finite  element  method  and  the  associated  software.  The 
resulting  discrete  equations  of  motion  for  structures,  both  in  terms  of  physical  coordi¬ 
nates  and  of  modal  coordinates,  are  expressed  in  a  second-order  form.  As  a  result,  the 
structural  engineering  community  has  been  investing  a  considerable  amount  of  research 
and  development  resources  to  develop  computer-oriented  discrete  modeling  tools,  ansilysis 
methods  and  interface  capabilities  with  design  synthesis  procedures;  all  of  these  exploiting 
the  charzicteristics  of  second-order  models. 

On  the  other  hand,  modern  linear  control  theory  has  its  roots  firmly  in  a  first-order  form 
of  the  governing  differential  equations,  e.g.,  (Kwakernaak  and  Sivan,  1972).  Thus,  several 
investigators  have  addressed  the  issues  of  interfacing  second-order  structural  systems  and 
control  theory  based  on  the  first-order  form  (Hughes  and  Skelton,  1980;  Arnold  and  Laub, 
1984;  Bender  and  Laub,  1985;  Oshman,  Inman  and  Laub,  1987;  Belvin  and  Park,  1989, 
1990).  As  a  result  of  these  studies,  it  has  become  straightforwEird  for  one  to  synthesize 
non-observer  based  control  laws  within  the  framework  of  a  first-order  control  theory  and 
then  to  recast  the  resulting  control  laws  in  terms  of  the  second-order  structural  systems. 

Unfortunately,  controllers  based  on  a  first-order  observer  are  difficult  to  express  in  a  pure 
second-order  form  because  the  first-order  observer  implicitly  incorporates  an  additional 
filter  equation  (Belvin  and  Park,  1989).  However  a  recent  work  (Juang  and  Maghami,  1990) 
has  enabled  the  first-order  observer  gain  matrices  to  be  synthesized  using  only  second-order 
equations.  To  complement  the  second-order  gain  synthesis,  the  objet.ive  of  the  present 
paper  is  to  develop  a  second-order  based  simulation  procedure  for  first-order  observers. 
The  particular  class  of  first-order  observers  chosen  for  study  are  the  Kalmtm  Filter  based 
state  estimators  as  applied  to  second-order  structural  systems.  The  procedure  permits 
simulation  of  first-order  observers  with  nearly  the  same  solution  procedure  used  for  treating 
the  structural  dynamics  equation.  Hence,  the  reduced  size  of  system  matrices  and  the 
computational  techniques  that  are  tailored  to  sparse  second-order  structural  systems  may 
be  employed.  As  will  be  shown,  the  procedure  hinges  on  discrete  time  integration  formulas 
to  effectively  reduce  the  continuous  time  Keilman  Filter  to  a  set  of  second-order  difference 
equations. 

The  paper  first  reviews  of  the  conventional  first-order  representation  of  the  continuous 
second-order  structural  equations  of  motion.  An  examination  of  the  corresponding  first- 
order  Kalman  filtering  equations  indicates  that,  due  to  the  difference  in  the  derivative  of 
the  estimated  displacement  (-^x)  and  the  estimated  velocity  (x),  transformation  of  the 
first-order  observer  into  eui  equivalent  second-order  objerver  requires  the  time  derivative 
of  measurement  data,  a  process  not  recommended  for  practical  implementation. 
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Next,  a  transformation  via  a  generalized  momentum  is  introduced  to  recast  the  structural 
equations  of  motion  in  a  general  first-order  setting.  It  is  shown  that  discrete  time  numerical 
integration  followed  by  reduction  of  the  resulting  difference  equations  circumvents  the  need 
for  the  time  derivative  of  measurements  to  solve  Kalman  filtering  equations  in  a  second- 
order  framework.  Hence,  the  Kalman  filter  equations  can  be  solved  using  a  second-order 
solution  software  package. 

Subsequently,  computer  implementation  aspects  of  the  present  second-order  observer  axe 
presented.  Several  computational  paths  are  discussed  in  the  context  of  discrete  and  con¬ 
tinuous  time  simulation.  For  continuous  time  simulation,  an  equation  augmentation  is 
introduced  to  exploit  the  symmetry  smd  sparcity  of  the  attendant  matrices  by  maintain¬ 
ing  state  dependant  control  and  observer  terms  on  the  right-hand-side  (RHS)  of  the  filter 
equations.  In  addition,  the  computational  efficiency  of  the  present  second  order  observer 
as  compared  to  the  first  order  observer  is  presented. 


Continuous  Formulation  of  Observers 
for  Structural  Systems 

Linear,  second-order  discrete  structural  models  can  be  expressed  as 

Mx  +  Dx  +  Kx  —  Bu -h  Gw  ,  x{0)  =  xq  ,  i(0)  =  io  (1) 

u  =  —Zix  —  Z2X 

with  the  associated  measurements 


z  =  Hix  +  H2X  -I-  V  (2) 

where  M,D,K  are  the  mass  damping  zind  stiffness  matrices  of  size  {N  x  iV);  x  is  the 
structural  displacement  vector,  {N  x  1);  u  is  the  active  control  force  (m  X  1);  J5  is  a 
constant  force  distribution  matrix  {N  x  m);  z  is  a  set  of  measurements  (r  x  1);  Hi  and  H2 
are  the  measurement  distribution  matrices  (r  x  N)]  Zi  emd  Z2  are  the  control  feedback  gain 
matrices  (m  x  N);  w  and  u  are  zero-mean,  white  Gaussian  processes  with  their  respective 
covariances  Q  and  J2;  and  the  superscript  dot  designates  time  differentiation.  In  the  present 
study,  we  will  restrict  ourselves  to  the  case  wherein  Q  and  R  are  uncorrelated  with  each 
other  and  the  initial  conditions  xq  and  xo  are  eilso  themselves  jointly  Gaussian  with  known 
means  and  covariances. 

The  conventional  representation  of  (1)  in  a  first-order  form  is  facilitated  by 

{Xi  =  X 

X2=X  =  Xi  (3) 

Mx2  =  Mx  =  Bu  -(-  Gw  —  Dx2  —  Kxi 
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which,  when  cast  in  a  first-order  form,  can  be  expressed  as 


{ 


Eq  =  Fq  +  Bu+Gw,  ?  =  (xi  0:2)^ 
z  =  Hq  +  u 


(4) 


where 


E  = 


7  0  ■ 
0  M 


F  = 


-K  -D 


^-{s} 


(5) 


It  is  well-known  that  the  Kalman  filtering  equations  (Kalman,  1961;  Kalman  and  Bucy, 
1963)  for  (4)  can  be  shown  to  be  (Arnold  and  Laub,  1984): 


E'q  =  Fq  +.Bu  -f  EPH'^R-^z 


where 


2  =  z  —  liq 


U  5^ 
5  L 


’  ^  1  J  I  ^  / 


(6) 


(7) 


in  which  U  and  L  are  positive  definite  matrices  and  the  matrix  P  is  determined  by  the 
Riccati  equation  (Kwakernaak  and  Sivan,  1972;  Arnold  and  Laub,  1984) 


EPE"^  =  FPE'^  +  EPF'^  -  EPH'^R-^  HPE'^  + 


(8) 


The  inherent  difficulty  of  reducing  the  first-order  Kalmein  filtering  equations  given  by  (6) 
to  second  order  form  can  be  appreciated  if  one  attempts  to  write  (6)  in  a  form  introduced 
in  (3): 

а)  f  1  =  X 

б)  £2  =  i  =  xi  —  L\z  (9) 

c)  Mx2  =  —Dx2  —  Kx\  +  Bu  -T  ML2Z 


where 


Li  ={HiU  +  H2SfR-\  L2  =  {HiS'^  -f  H2LfR-^ 


Note  from  (9b)  that  X2  5^  xj.  In  other  words,  the  time  derivative  of  the  estimated  dis¬ 
placement  (x)  is  not  the  same  as  the  estimated  velocity  (x);  hence,  Xi  and  X2  must  be 
treated  as  two  independent  variables,  an  important  observation  somehow  overlooked  in 
Hashemipour  and  Laub  (1988). 

Of  course,  although  not  practical,  one  can  eliminate  £2  from  (9).  Assuming  £%  and  X2  are 
differentiable,  differentiate  (9b)  and  multiply  both  sides  by  M  to  obtain 


M£i  —  Mx2  -f  MLiz 


(10) 
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Substituting  Mfj  from  (9c)  and  from  (9b)  in  (10)  yields 

Mx\  —  —D(xi  —  Liz)  —  Kxi  f  Bu  +  ML^z  +  MLiz  (11) 

which,  upon  rearrangements,  becomes 

Mil  +  Dxi  4-  Kxi  =  Bu  +  ML^z  +  MLjz  +  DL\z  (12) 

There  are  two  difficulties  with  the  above  second-order  observer.  First,  the  numerical 
solution  of  (12)  involves  the  computation  of  xi  when  rate  measurements  are  made.  The 
accuracy  of  this  computation  is  in  general  very  susceptible  to  errors  caused  in  numerical 
differentiation  of  xi.  Second,  and  most  important,  the  numerical  evaluation  of  z  that 
is  required  in  (12)  assumes  that  the  derivative  of  measurement  information  is  available 
which  should  be  avoided  in  practice.  We  now  present  a  computational  procedure  that 
circumvents  the  need  for  computing  measurement  derivatives  and  that  enables  one  to 
construct  observers  based  on  the  second-order  models. 

Second-Order  Transformation  of 
Continuous  Kalman  Filtering  Equations 

This  section  presents  a  transformation  of  the  continuous  time  first-order  Kalman  filter  to 
a  discrete  time  set  of  second-order  difference  equations  for  digital  implementation.  The 
procedure  avoids  the  need  for  measurement  derivative  information.  In  addition,  the  spar¬ 
sity  and  symmetry  of  the  original  mass,  damping  and  stiffness  matrices  can  be  maintained. 
Prior  to  describing  the  numerical  integration  procedure,  a  transformation  based  on  gener¬ 
alized  momenta  is  presented  which  is  later  used  to  improve  computational  efficiency  of  the 
equation  solution. 

Generalized  Momenta 

Instead  of  the  conventional  transformation  (3)  of  the  second-order  structural  system  (1) 
into  a  first-order  form,  let  us  consider  the  following  generalized  momenta  (Jensen,  1974; 
Felippa  and  Park,  1978): 

/  o)  ari  =  X  .  . 

(  b)  X2  =  AMxi  -f  Cxx  '  ' 

where  A  and  C  are  constant  matrices  to  be  determined.  Time  differentiation  of  (13b) 
yields 

X2  =  AMxi  +  Cx\  (14) 
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Substituting  (1)  via  (13a)  into  (14),  one  obtains 

X2  =  A{Bu  +  Gw)  -  (AD  -  C)ii  -  AKxi  (15) 

Finally,  pairing  of  (13b)  and  (15)  gives  the  following  first-order  form: 


AM 

AD-C 


[^(Su-f  Gu;)J 

The  associated  Kalman  filtering  equation  can  be  shown  to  be  of  the  following  form: 


(16) 


AM 

AD-C 


AM 

AD-C 


where 


Li  ={HiU  +  H2S)'^R-\  U  =  (Hi  5^'  +  H2LfR 


f-  ^  ( fj.  qT 


\Tr,-l 


amd  Hi  and  H2  correspond  to  a  modified  form  of  measurements  expressed  ais 


z  =  Hix  +  H2X  =  H\Xi  +  H2X2 


(18) 


where 

Hi  =  Hi  -  HjM-^-^C,  Hi  =  HzM-U"^ 

Clearly,  as  in  the  conventionaJ  first-order  form  (9),  ii  aind  X2  in  (17)  are  now  two  inde¬ 
pendent  variables.  Specifically,  the  caise  of  A  =  M~^  amd  C  =  0  corresponds  to  (3)  with 
X2  =  xi.  However,  as  we  shall  see  below,  the  Kalmam  filtering  equations  based  on  the 
generalized  momenta  (13)  offer  several  computationaJ  advantages  over  (3). 

Numerical  Integration 

At  this  jtmcture  it  is  noted  that  in  the  previous  section  one  first  performs  the  elimination 
of  xi  in  order  to  obtain  a  second-order  observer,  then  performs  the  numerical  solution 
of  the  resulting  second-order  observer.  This  approach  has  the  disadvantage  of  having  to 
deal  with  the  time  derivative  of  measurement  data.  To  avoid  this,  we  will  first  integrate 
numerically  the  associated  Kalman  filtering  equation  (17). 
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The  direct  time  integration  formula  we  propose  to  employ  is  a  mid-point  version  of  the 
trapezoidal  rule: 


a) 

< 

b) 


\  /  \  X2  J  \  X2  i 


(19) 


where  the  superscript  n  denotes  the  discrete  time  interval  =  nh,  h  is  the  time  increment 
and  5  =  h/2. 


Time  discretization  of  (17)  by  (19a)  at  the  n  -f  1/2  time  step  yields 


-n+l/2 


-/i  fir-'M 

0  J  \  / 

“  1 
^J5„n+l/2  J 


(20) 


The  above  difference  equations  require  the  solution  of  matrix  equations  of  2N  variables, 
namely,  in  terms  of  the  two  variables  and  x”'*’*^*,  each  with  a  size  of  N.  To 

reduce  the  above  coupled  equations  of  order  2JV  into  the  corresponding  ones  of  order  N, 
we  proceed  in  the  following  way  by  exploiting  the  nature  of  parametric  matrices  of  A  and 
C  as  introduced  in  (13).  To  this  end,  we  write  out  (20)  as  two  coupled  difference  equations 
as  follows: 

--  x")  -f-  (5(C'x”+^''^  - 

=  (21) 
(AD  -  C7)(.-5"'*''^^  -  X?)  +  (X2+^/^  -  xj)  +  SAKx^'^^''^ 

=  6{AD  -  -f  (22) 

Multiplying  (22)  by  S  and  adding  the  resxdting  equation  to  (21)  yields 

A(M  )x =  (AM  -h  6(AD  -  C))x^  +  6x^ 

+{6AMLi  +  S\AD  -  C)Li  +  ^  (23) 


Of  several  possible  choices  for  matrices  A  and  B,  we  will  examine 

r  a)  A  =  J,  C  =  D 
\  b)  A  =  M~^  ,  C  =  0 


(24) 
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The  choice  of  (24a)  reduces  (23)  to: 


{M  +  SD  +  =  Mx^  +  Sx^  + 

+^{Afii+^Z2}r+^/2 

so  that  once  is  computed,  is  obtained  from  (22)  rewritten  as 

=  xj  +  Sg^  - 


(25) 


(26) 


where 

y”  =  ^  1^2^+112 


(27) 


which  is  already  computed  in  order  to  construct  the  right-hand  side  of  (25).  Hence, 
is  the  only  additional  computation  needed  to  obteiin  It  is  noted  that 

lieither  euiy  numerical  differentiation  nor  matrix  inversion  is  required  in  computing 
This  has  been  zichieved  through  the  introduction  of  the  general  transformation  (13)  and 
the  particular  choice  of  the  parameter  matrices  given  by  (24a). 

On  the  other  hand,  if  one  chooses  the  conventioned  representation  (24b),  the  solution  of 

«n+l/2  .g  ^23) 


{M  +  6D  +  =  (M  +  6D)x^  +  SMx^ 

+6{{M  +  SD)Li  f  6ML2 (28) 
Or  e  is  obtained,  can  be  computed  either  by 

=  (x;‘'^‘/^  -  x^)/6  -  (29) 


which  is  not  accurate  due  to  the  numerical  differentiation  to  obtain  or  by  (22) 


=  X?  +  6g^  - 

M I>(xi  -  x^  +  (30) 


which  involves  two  additional  matrix-vector  multiplications,  when  JD  0,  as  compared 
with  the  choice  o{  A  =  I  and  C  =  D.  Thus  (24a)  is  the  preferred  representation  in  a 
first-order  form  of  the  second-order  structural  dynamics  equations  (1)  and  is  used  in  the 
remainder  of  this  work. 
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Decoupling  Of  Difference  Equations 

We  have  seen  in  the  previous  section,  instead  of  solving  the  first-order  Kalman  filtering 
equations  of  2n  variables  for  the  structural  dynamics  systems  (1),  the  solution  of  the  im¬ 
plicit  time-discrete  observer  equation  (25)  of  n  variables  can  potentially  offer  a  substantial 
computational  saving  by  exploiting  the  reduced  size  and  sparsity  of  M,D  and  K.  This 
assumes  that  and  are  available,  which  is  not  the  case  since  at  the  time 

step 


(31) 

^n+1/2  ^  ^n+1/2  _ 

(32) 

requires  both  and  even  if  is  assumed  to  be  known  from  meeisurements 

or  by  solution  of  (1).  Note  in  (32),  the  control  gain  matrices  are  transformed  by 

There  are  two  distinct  approaches  to  uncouple  (25)  and  (26)  as  described  in  the  following 
sections. 

Discrete  Time  Update 

Equations  (31)  and  (32)  can  be  approximated  using 


(33) 

^"+1/2  ^  _ZiX'^  -  ZjxJ 

(34) 

This  approximation  leads  to  a  discrete  time  update  of  the  control  force  and  state  correction 
terms  which  is  analogous  to  that  which  exists  in  experiments  where  a  finite  bandwidth  of 
meeisiirement  updates  occurs.  For  discrete  time  approximation,  the  step  size  h  =  —  t” 

should  be  chosen  to  match  the  time  required  to  acquire,  process  and  output  a  control 
update. 

Discrete  time  simulation  is  quite  simple  to  implement  as  the  control  force  and  state  cor¬ 
rections  axe  treated  with  no  approximation  on  the  right-heind-side  (RHS)  of  (25)  and  (26). 
Should  continuous  time  simulation  be  required,  a  different  approach  is  necessary. 

Continuous  Time  Update 

To  simulate  the  system  given  in  (25)  and  (26)  in  continuoii.s  time,  strictly  speaking,  one 
must  rearrange  (25)  and  (26)  so  that  the  terms  involving  and  are  augmented 
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to  the  left-hand-side  (LHS)  of  the  equations.  However,  this  augmentation  into  the  solution 
matrix  {M-\-6D+8‘^K)  would  destroy  the  computational  advantages  of  the  matrix  sparcity 
and  symmetry.  Thus,  a  partitioned  solution  procedure  has  been  developed  for  continuous 
time  simulation  as  described  in  (Park  and  Belvin,  1991).  The  procedure,  briefly  outlined 
herein,  maintains  the  control  force  and  state  correction  on  the  RHS  of  the  equations  as 
follows. 

First,  x" and  are  predicted  by 


X 


n-f-l/2 

ip 


'I  > 


.n+l/2  _ 
hp 


(36) 


•  •  •  • 

However,  instead  of  direct  substitution  of  the  above  predicted  quantity  to  obtain  Up  ' 
and  Zp^^^^  based  on  (31)  and  (32),  equation  augmentations  are  introduced  to  improve  the 
accuracy  of  and  .  Of  several  augmentation  procedures  that  are  applicable 

to  construct  discrete  filters  for  the  computations  of  and  we  substitute  (26) 

into  (31)  and  (32)  to  obtain 


^n+l/2^^n+l/2^^^-+l/2_ 

H2ix^  -  -t-  SLiZ^-^^/'^) 

Rearranging  the  above  coupled  equations,  one  obtains 


(36) 


(/  -J-  6Z2B)  6Z2L2 

6H2B  {l^6H2 


Ir” 


} 


~Z2X^-{Zi  -6Z2K)xi'f^ 

+1/2  -  H2X^  -  {Hi  ~  6H2K)x'1'^^^^ 


(37) 


which  corresponds  to  a  first  order  filter  to  reduce  the  errors  in  computing  xj  =  Mx  -f-  Dx. 
A  second-older  discrete  filter  for  computing  u  and  z  can  be  obtained  by  differentiating  u 
emd  z  to  obtain 

ti  =  —ZiXi  —  Z2X2 

k  =  z  -  Hi'xx  -  H2X2 


{1 


(38) 


and  then  substituting  xj  and  X2  from  (17).  Subsequently,  (19)  is  applied  to  integrate  the 
equations  for  u  and  z  which  yields 


'I  +  SZ2B-\-6^ZiM-^B  6{Z2L2  +  ZiLi  +  SZiM-^L2)  l/u 

S{H2B  -{-  SHiM-'^B)  I  +  SHiiLi  -I-  SM-^L2)  +  8H2L2  \  z 

_  (  ZiM-^{x^  -  -  i)x”+*/^)  -f-  ZiKx’l'^^^^  \ 


n+1/2 

n+1/2 


}= 


(u-\_  (ZiA 


}  +  {  ^»+I/2  _  }  (33) 
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The  net  effects  of  this  augmentation  are  to  filter  out  the  errors  committed  in  estimating 
both  xi  and  12  •  Solution  of  (39)  for  and  permits  (25)  and  (26)  to  be  solved 

in  continuous  time  for  and  Subsequently,  (29b)  is  used  for  x""*"^  and 

The  preceding  augmentation  (39)  leads  to  an  accurate  estimate  of  the  control  force  and 
observer  error  correction  at  the  (n+1/2)  time  step.  Although  (39)  involves  the  solution  of 
an  additional  algebraic  equation,  the  equation  size  is  relatively  small  (  Size  =  number  of 
actuators  (m)  plus  the  number  of  measurements  (r)  ).  Thus,  (39)  is  an  efficient  method 
for  continuous  time  simulation  of  the  Kalman  filter  equations  provided  the  size  of  (39)  is 
significantly  lower  than  the  first  order  form  of  (4).  The  next  section  discusses  the  relative 
efficiency  of  the  present  method  and  the  conventional  first  order  solution.  More  details  on 
the  equation  augmentation  procedure  (39)  may  be  found  in  Park  and  Belvin  (1991). 

Finally,  it  is  noted  that  by  following  a  similar  time  discretization  procedure  adopted  for 
computing  and  the  structural  dynamics  equation  (1)  can  be  solved  by 


{M  +  6D  +  ^  ^ 


(40) 


Thus,  numerical  solutions  of  the  structural  dynamics  equation  (1)  and  the  observer  equa¬ 
tion  (20)  can  be  cztrried  out  within  the  second-order  solution  context,  thus  realizing  sub¬ 
stantial  computational  simplicity  compared  with  the  solution  of  first-order  systems  of  equa¬ 
tions  (4)  and  the  corresponding  first-order  observer  equations  (6). 

It  is  emphasized  that  the  solutions  of  both  the  structural  displacement  x  and  the  re¬ 
constructed  displacemei-t  x  employ  the  same  solution  matrix,  (M  -j-  6D  +  6^K).  The 
computational  stability  of  the  present  procedure  can  be  examined  as  investigated  in  Park 
(1980)  and  Psurk  and  Felippa  (1983,  1984).  The  result,  when  applied  to  the  present  case, 
CEm  be  stated  as 

^max  (41) 


where  Amax  is  the  maximum  eigenvalue  of 


(A^  J  +  XZiB  ZiM-'^B)y  =  0 


(42) 


Experience  has  shown  that  ]  Amax  I  Is  several  orders  of  magnitude  smaller  than  ;imax  of 
the  structural  dynamics  eigenvalue  problem: 


fiMy  =  Ky 


(43) 


Considering  that  a  typical  explicit  algorithm  has  its  stability  limit  /limax  •  h  <  2,  the 
maximum  step  size  allowed  by  (42)  is  in  fact  several  orders  of  magnitude  larger  than 
allowed  by  any  explicit  algorithm. 
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Computational  Efficiency 

Solution  of  the  Kalman  filtering  equations  in  second-order  form  is  prompted  by  the  po¬ 
tential  gain  in  computational  efficiency  due  to  the  beneficial  nature  of  matrix  sparcity  and 
symmetry  in  the  solution  matrix  of  the  second-order  observer  equations.  There  is  an  over¬ 
head  to  be  paid  for  the  present  second-order  procedure,  that  is,  the  additional  computations 
introduced  to  minimize  the  control  force  and  observer  error  terms  on  the  right-hand-side  of 
the  resulting  discrete  equations.  The  following  paragraphs  show  the  second-order  solution 
is  most  advantageous  for  observer  models  with  sparse  coefficient  matrices  M,  D  and  K. 

Solution  of  the  first  order  Kalman  filter  equation  (6)  or  the  second-order  form  (25-26,  39) 
may  be  performed  using  a  time  discretization  as  given  by  (19).  For  linear  time  invariant 
(LTI)  systems,  the  solution  matrix  is  decomposed  once  jind  subsequently  upper  and  lower 
triangular  system  solutions  are  performed  to  compute  the  observer  state  at  each  time  step. 
Thus,  the  computations  required  at  each  time  step  result  from  calcffiation  of  the  RHS 
and  subsequent  triangular  system  solutions.  For  the  results  that  follow,  the  number  of 
floating  point  operations  per  second  (flops)  are  estimated  for  LTI  systems  of  order  0(N). 
In  addition,  it  is  assumed  that  the  mass,  damping  and  stiffness  matrices  (M,  D  and  K) 
are  symmetric  and  banded  with  bandwidth  aN,  where  0  <  a  <  (0.5  - 

The  first-order  Kalman  filter  equation  (6)  requires  (4JV^  -I-  2JVr  -f-  0{N))  flops  at  each 
time  step.  The  discrete  time  second-order  Kalmetn  filter  solution  (25-26,  33-34)  require 
(Sa^iV^  -f2aiV^  -|-3iVm-l-4iVr-f-0(iV’))  flops  and  the  continuous  time  second-order  Kalman 
filter  (25-26,  39)  require  (8aiV^  +  2aN^  -f-  5Nm  -H  6iVr  -j-  (r  -f  m)*  -f  0{N))  flops  at  each 
time  step.  To  examine  the  relative  efficiency  of  the  first-order  and  second-order  forms, 
severjil  cases  are  presented  as  follows. 

First,  a  worst  case  condition  is  examined  whereby  M,  D  and  K  are  fully  populated  (a  = 
0.5  -  5^)  and  r  =  m  =  TV.  For  this  condition,  the  number  of  flops  are: 

{First  Order  -f  0{N) 

Second  Order  Discrete  lON^  -f  0{N) 

Second  Order  Continuous  18TV^  -f  0{N) 

Thus,  for  non-sparse  systems  with  large  numbers  of  sensors  and  actuators  relative  to  the 
system  order,  the  first  order  Kalman  filter  is  300  percent  more  efficient  than  the  second- 
order  continuous  Kalman  filter  solution  presented  herein. 

For  structural  systems,  M,  and  K  are  almost  always  banded.  In  addition,  the  number 
of  sensors  and  eictuators  is  usually  small  compared  to  the  system  order  N.  Hence,  the 
value  of  a  for  which  the  second-order  form  becomes  more  computationally  attractive  than 
the  first  order  form  must  be  determined.  If  the  assumption  is  made  that  the  number  of 
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actuators  (m)  and  the  number  of  measurements  (r)  is  proportional  to  the  bandwidth  ( 
r  =  m  =  aJV),  the  value  of  a  which  renders  the  second-order  solution  more  efficient  is 
readily  obtained.  For  the  'second-order  discrete  Kalman  filter,  when  a  <  0.394  the  second- 
order  form  is  more  efficient.  Similarly,  the  second-order  continuous  Kalman  filter  form  is 
more  efficient  when  a  <  0.279.  Since  a  obtains  values  approaching  0  when  a  modal  based 
structural  representation  is  used  with  few  sensors  and  actuators,  the  second-order  form 
can  be  substantially  more  efficient  than  the  classical  first-order  form.  A  more  detailed 
discussion  cam  be  found  in  Belvin  (1989). 


Implementation  and  Numerical  Evaluations 

The  second-order  discrete  Kalman  filtering  equation  derived  in  (25)  amd  (26)  have  been 
implemented  adong  with  the  stabilized  form  of  the  controller  u  amd  the  filtered  measure¬ 
ments  z  in  such  a  way  the  observer  computationad  module  can  be  interfaced  with  the 
paurtitioned  control-structure  interaction  simulation  package  developed  previously  (Belvin, 
1989;  Belvin  Park,  1991;  Alvin  and  Park,  1991).  Table  1  contrasts  the  present  CSI  simula¬ 
tion  procedure  to  conventional  procedures.  It  is  emphaisized  that  the  solution  procedure  of 
the  present  second-order  discrete  Kalman  filtering  equations  (25)  amd  (26)  follows  exactly 
the  same  steps  as  required  in  the  solution  of  symmetric,  sparse  structural  systems  (or  the 
plamt  dynaunics  in  the  jaurgon  of  control).  It  is  this  attribute  that  makes  the  present  discrete 
observer  attractive  from  the  simulation  viewpoint. 

The  first  exaunple  is  a  truss  beaim  shown  in  Fig.  1,  consisting  of  8  bays  with  nodes  1  amd 
2  fixed  for  camtilevered  motions.  The  locations  of  actuator  amd  sensor  applications  ais  well 
as  their  directions  are  given  in  Table  2.  Figures  2,  3  amd  4  are  the  verticad  displacement 
histories  at  node  9  for  open-loop,  direct  output  feedback,  and  dynamically  compensated 
feedback  caises,  respectively.  Note  the  effectiveness  of  the  dynamically  compensated  feed¬ 
back  case  by  the  present  second-order  discrete  Kadmam  filtering  equations  as  compared 
with  the  direct  output  feedback  cases.  Figure  5  illustrates  a  testbed  evolutionary  model 
of  an  Earth-pointing  satellite.  Eighteen  actuators  amd  18  sensors  are  applied  to  the  sys¬ 
tem  for  vibration  control  and  their  locations  aire  provided  in  Tables  3  amd  4.  Figures  6, 
7,  amd  8  are  a  representative  of  the  responses  for  open-loop,  direct  output  feedback,  amd 
dynamicadly  compensated  cases,  respectively.  Note  that  u*  response  by  the  dynamically 
compensated  caise  does  drift  away  initially  even  though  the  settling  time  is  about  the  same 
as  that  by  the  direct  output  feedback  case.  However,  the  sensor  output  aure  assumed  to 
be  noise-free  in  these  two  numerical  experiemnts.  Although  the  objective  of  the  present 
paper  is  to  establish  the  computational  effectiveness  of  the  second-order  discrete  Kalman 
filtering  equations,  we  conjecture  that  for  noise-contaiminated  sensor  output  for  which  one 
would  apply  dynaimic  compensated  strategies,  the  relative  control  performamce  may  turn 
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out  to  be  the  opposite.  Further  simulations  with  the  present  procedure  should  shed  light 
on  the  performance  of  dynamically  compensated  feedback  systems  for  large-scale  systems 
as  they  are  computationally  more  feasible  than  heretofore  possible. 

Table  5  illustrates  the  computational  overhead  associated  with  the  direct  output  feedback 
vs.  the  use  of  a  dynamic  compensation  scheme  by  the  output  present  Kalman  filtering 
equations.  In  the  numerical  experiments  reported  herein,  we  have  relied  on  Matlab  software 
package  (V/olfram,  1988)  for  the  synthesis  of  both  the  control  law  gains  and  the  discrete 
Kalman  filter  gain  matrices.  It  is  seen  that  the  use  of  the  present  second-order  discrete 
Kalman  filtering  equations  for  constructing  dynamically  compensated  control  laws  adds 
computational  .overhead,  only  an  equivalent  of  open- loop  transient  analysis  of  symmetric 
sparse  systems  of  order  N  instead  of  2N  x  2N  dense  systems. 


Summary 

The  present  paper  has  addressed  the  advantageous  features  of  employing  the  same  direct 
time  integration  algorithm  for  solving  the  structural  dynamics  equations  also  to  integrate 
the  associated  continuous  Kalman  filtering  equations.  The  time  discretization  of  the  re¬ 
sulting  Kalman  filtering  equations  is  further  facilitated  by  employing  a  canonical  first-order 
form  via  a  generalized  momenta.  When  used  in  conjunction  with  the  previously  developed 
stabilized  form  of  control  laws  (Park  and  Belvin,  1991),  the  present  procedure  offers  a  sub 
stantial  computational  advantage  over  the  solution  methods  bzised  on  a  first-order  form 
when  computing  with  large  and  sparse  observer  models. 

Computational  stability  of  the  present  solution  method  for  the  observer  equation  has  been 
assessed  based  on  the  stability  analysis  result  of  partitioned  solution  procedures  (Paxk, 
1980).  To  obtain  a  sharper  estimate  of  the  stable  step  size,  a  more  rigorous  computational 
stability  anedysis  is  being  carried  out  eind  will  be  reported  in  the  future. 
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Structure: 


Mq  +  Dq  +  Kq  =  f  +  Bu  +  Gw 


q(0)  =  qo,  q(0)  =  qo 


Sensor  Output:  b)  z  =  Hx  +  v 


Estimator: 


Mq  +  Dq  +  Kq  =  f  +  Bu  +  ML27 


q(0)  =  0,  q(0)  =  0 

Control  Force:  d)  u  +  F2M“^Bu  =  F2(M“^p  +  L27)  +  Fiq 

A  i  4 

Estimation  Error:  c)  7  +  H„L27  =  z  -  H„M~  (p  -  Bu)  —  H^q 


Table  la  Partitioned  Control-Structure  Interaction  Equations 


Structure: 


a)  X  =  Ax  +  Ef  +  Bu  +  Gw 


q(o)  =  qo.  q(o)  =  qo 


Sensor  Output:  b)  z  =  Hx  +  v 


Estimator: 


c)  X  =  Ax  +  Ef  +  Bu  +  L7 


x(0)  =  0 


where 


Control  Force:  d) 

Estimation  Error:  e) 


u  =  -Fx 

7  =  z-(Hiq+H„q) 


■={:}•  *-{i} 


H  =  H„],  L=  p 


U  ’ 


0  I 

■M-‘K  -M“^D  ’ 


-In  ’ 


M-'B 


F  =  [Fi  F2^ 


Table  lb  Conventional  Control-Structure  Interaction  Equatioons 
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TABLE  2a: 

Actuator  Placement  for  Truss  Example  Problem 


Actuator  Node  Component 


1  2  y 

2  is  y 

3  9  y 

4  9  X 


TABLE  2b: 

Sensor  Placement  for  Truss  Example  Problem 


Sensor 

Type 

Node 

Component 

1 

Rate 

2 

y 

2 

Rate 

18 

y 

3 

Rate 

9 

y 

4 

Rate 

9 

X 

5 

Position 

9 

y 

6 

Position 

9 

X 

TABLE  3: 

Actuator  Placement  for  EPS  Example  Problem 


Actuator 

Node 

Component 

1 

97 

X 

2 

97 

z 

3 

96 

X 

4 

96 

z 

5 

65 

y 

6 

68 

y 

7 

59 

y 

8 

62 

y 

9 

45 

y 

10 

45 

z 

11 

70 

y 

12 

70 

z 

13 

95 

X 

14 

95 

y 

15 

95 

z 

16 

95 

<l>x 

17 

95 

<i>y 

18 

95 

<t>z 

19 


TABLE  4: 

Sensor  Placement  for  EPS  Example  Problem 


Sensor  Type  Node  Component 


1 

Rate 

97 

X 

2 

Rate 

97 

z 

3 

Rate 

96 

X 

4 

96 

z 

5 

Rate 

65 

y 

6 

Rate 

68 

y 

7 

Rate 

59 

y 

8 

Rate 

62 

y 

9 

Rate 

45 

y 

10 

Rate 

45 

z 

11 

Rate 

70 

y 

12 

Rate 

70 

z 

13 

Position 

95 

X 

14 

Position 

95 

y 

15 

Position 

95 

z 

16 

Position 

95 

<f>x 

17 

Position 

95 

<i>y 

18 

Position 

95 
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TABLE  5: 

CPU  Results  for  ACSIS  Sequential  and  Parallel  Versions 


Model 

Problem 

Type 

Sequential 

Psurallel 

54  DOF 

Transient 

4.5 

5.6 

Truss 

FSFB 

9.4 

10.2 

K.  Filter 

13.0 

10.7 

582  DOF 

Transient 

98.6 

EPS7 

FSFB 

190.2 

K.  Filter 

284.2 
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Truss  Model:  Open  Loop  Transient  Response 
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1.2  X  10-4 


0.000 

0.000  0.200  0.400  0.600  0.800  1.000 

Time,  sec 

-  Node  9,  uy 

B'igure  2:  Truss  Transient  Response 


Truss  Model:  Full  State  Feedback  Response 

6.0  X  10-4 
4.8  X  10-4 

C 

■B  3.6  X  10-4 
01 
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Time,  sec 

-  Node  9,  uy 

Figure  3;  Truss  FSFB  Response 


Deflection 


Truss  Model:  Controlled  Response  with  Kalman  Filter 
6.0  X  10““* 

4.8  X  10“'‘ 

3.6  X  10-^ 
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Figure  4;  Truss  Response  with  Filter 
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Figure  5;  Evolutionary  Earth-Pointing  Satellite 


EPS?  Model:  Open  Loop  Transient  Response 
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Figure  6:  EPS  IVansient  Response 


EPS7  Model:  Full  State  Feedback  Response 
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Figure  7:  EPS  FSFB  Response 


Model:  Controlled  Response  w/Kalman  Filter 


Time,  sec 
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Figure  8:  EPS  Response  with  Filter 


On  the  State  Estimation  of  Structures  with  Second  Order  Observers 
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Abitract 

The  use  of  Linear  Quadratic  Regulator  (LQR)  control  synthe¬ 
sis  techniques  implies  the  availability  of  full  state  feedback. 
For  vibration  control  of  structures,  usually  only  a  limited 
number  of  states  are  measured  from  which  an  observer  model 
reconstructs  the  full  state.  This  paper  shows  that  using  sec¬ 
ond  order  observers  is  a  viable  technique  for  reconstructing 
the  unmeasured  states  of  structures  under  mildly  restrictive 
conditions.  Moreover,  the  computational  advantages  of  the 
second  order  observer  as  compared  to  a  first  order  observer 
indicate  that  significantly  larger  observer  models  may  be  uti¬ 
lized.  Numerical  examples  are  used  to  demonstrate  the  per¬ 
formance  of  second  order  observers.  The  implications  of  sec¬ 
ond  order  observers  in  the  development  of  Control/Structures 
Interaction  (CSI)  technology  is  discussed. 

X.  Introduction 

Recent  emphasis  on  the  optimal  interdisciplinary  design 
of  actively  controlled  spacecraft  has  led  to  the  formation 
of  a  focused  research  activity  within  NASA  called  Con¬ 
trol/Structures  Interaction  (CSI).  The  aim  of  the  CSI  ac¬ 
tivity  is  to  coordinate  University.  Industry  and  Government 
research  to  develop  the  technology  required  to  make  active 
control  of  flexible  spacecraft  routine.  To  this  end,  several 
investigators  have  begun  to  exploit  the  second  order  form  of 
the  differential  equations  which  describe  structural  dynam¬ 
ics.  The  controllability  and  observability  of  linear  second 
order  models  has  been  studied  by  Laub  and  Arnold^  Hughes 
and  Skelton*  and  by  Bender  and  Laub.* 

Park  and  Belvin*'*  demonstrated  the  computational  advaiv 
tages  of  simulating  the  coupled  CSI  equations  in  second  order 
form.  Unlike  classical  first  order  simulation  of  the  CSI  equa¬ 
tions.  simulation  in  second  order  form  enables  the  symmetry 
and  sparsity  of  the  structural  equations  to  be  exploited.  Sig¬ 
nificant  computational  efficiency  is  gained  by  treating  the  CSI 
equations  in  second  order  form.  Moreover,  a  natural  parti¬ 
tioning  of  controls  and  structures  is  indicated  by  maintaining 
the  structural  equations  in  second  order  form.* 

The  linear  quadratic  regulator  (LQR)  control  synthesis  tech¬ 
nique  has  excellent  robustness  properties.  Safonov  and 


'  Structural  Dynamics  Division.  NASA  Langley  Research 
Center.  Member  AIAA. 

*  Professor  of  Aerospace  Engineering.  University  of  Colorado. 
Member  AIAA. 


Athens*  have  proven,  when  the  full  state  is  available,  that 
the  LQR  technique  provides  60*  of  phase  margin  and  infinite 
gain  margin.  However,  for  space  structures  the  full  state  is 
not  available  and  an  observer  must  be  used  in  conjunction 
with  LQR.  No  guarantees  can  be  made  on  the  robustness 
properties  for  the  observer  based  LQR  controller.^  Thus  the 
observer  plays  a  key  role  in  the  study  of  CSI  when  full  state 
feedback  is  employed. 

Observer  state  reconstruction  suffers  from  model  errors, 
measurement  noise  and  unmodeled  dynamics.  Unmodeled 
dynamics  result  from  the  use  of  reduced  order  models.*  To 
reduce  the  level  of  unmodeled  dynamics,  the  size  of  the  ob¬ 
server  could  be  increased,  provided  the  observer  solution  can 
still  be  performed  in  real-time.  The  computational  advan¬ 
tages  associated  with  the  second  order  observer  may  permit 
larger  observers  with  no  penalty  in  solution  time  as  compared 
to  the  first  order  observer. 

Second  order  observer  models  have  received  recent  attention 
in  the  literature.  Hashemipour  and  Laub*  utilized  an  optimal 
observer  known  as  the  Kalman  Filter  for  discretized  (time  and 
space)  second  order  structures  models.  In  addition,  robust 
computational  procedures  for  solution  of  the  Kalman  Filter 
estimation  error  covariance  matrices  have  been  developed  for 
second  order  models  in  Ref.  10.  Unfortunately,  the  continu¬ 
ous  time  Kalman  Filter  has  only  been  successfully  developed 
in  first  order  form. 

It  seems  paradoxical  that  the  optimal  way  to  estimate  the 
states  of  a  second  order  system  is  with  a  first  order  observer 
model.  Although  there  is  more  design  freedom  when  using 
a  first  order  model,  the  disadvantage  of  numerically  simu¬ 
lating  the  CSI  equations  in  first  order  form  may  prove  that 
sub-optimal  second  order  observers  are  most  practical.  It 
is  from  this  perspective  that  some  analytical  and  numerical 
results  are  presented  herein  to  highlight  the  advantages  and 
disadvantages  of  using  second  order  observers  to  estimate 
the  states  of  realistic  spacecraft. 

In  section  2.  the  governing  CSI  equations  are  presented  using 
nomenclature  similar  to  Refs.  9  and  10.  It  includes  the  clas¬ 
sical  first  order  observer  and  a  logical  form  for  the  second  or¬ 
der  observer.  Stability  and  performance  of  the  observers  are 
discussed  in  Section  3.  Practical  computational  aspects  of 
the  observers  are  examined  in  Section  4.  Section  5  presents 
numerical  results  which  demonstrate  the  viability  of  second 
order  observers.  In  addition,  implications  of  the  second  order 
observer  on  CSI  technology  are  discussed. 
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2.  Controlkd  Structure  Simulation  Equations 

A  control-structure  interaction  system  can  be  represented  as 
shovyn  in  Fig.  1.  The  linear  time-invariant  discretized  equa¬ 
tions  of  motion  for  the  structure  (plant)  may  be  described 
by  the  following  set  of  continuous-time  equations: 

Mq  -f-  Dq  +  Kq  =  f  -f-  Bu  +  Gw 

q(o)  =  qo,  q(o)  =4)  (21) 

Z  =Hiq  f-H„q  +  v 
u  =  Fiq  +  Fjq 

where  M,  D,  K  are  the  mass,  damping  and  stiffness  ma¬ 
trices,  respectively.  These  matrices,  typically  derived  using 
finite  element  modeling,  are  symmetric  and  sparse.  The  vec¬ 
tor  f  represents  known,  state  independent,  applied  forces.  B 
is  the  actuator  location  matrix  and  u  is  the  state  dependent 
control  force.  The  matrix  G  describes  the  disturbance  loca¬ 
tion  and  w  is  the  disturbance  vector.  The  displacement  and 
velocity  initial  conditions  are  given  by  q,  and  4i-  respectively. 
The  measured  output  of  the  system  is  s  where  v  is  a  vector 
of  measurement  noise.  The  matrices  Ha  and  H«  represent 
the  displacement  and  velocity  sensor  locations  and  Fi  and 
F]  are  feedback  gain  matrices  of  the  controller. 

The  conventional  technique  for  dealing  with  multi-variable 
control  problems  is  to  convert  the  system  to  first  order  state- 
space  form. 

i  =  Ax -I- Ef-h  Su G  •  (2 '2) 

z  =  Hx  +  V,  x(0)  =  Xo 
u  =  Fx 

where 

H  =  (Ha  H,|,  F  =  (F.  F,] 


The  control  gain  F  may  ba  synthesized  by  a  number  of  tech¬ 
niques  as  given  in  standard  texts  such  as  Ref.  11.  When 
full  state  feedback  is  used,  and  the  full  state  cannot  be  mea¬ 
sured.  an  observer  model  must  be  developed  to  estimate  the 
states  of  the  entire  structure  from  the  measured  states  .  The 
form  of  the  first  order  and  second  order  observer  models  is 
discussed  below. 

2J.  First  Order  Observer  Model 

The  observer  model  is  usually  constructed  by  augmenting 
(2.2)  by  a  state  correction  term  such  that 

X  =  Ax  -I-  Ef  4-  Bu  L(z  -  Hit)  (2  •  3) 

x(0)  =:  0 


Figure  1.  Typical  Control /Structure  Interaction  System 


and  A.  E.  B  and  H  are  a  reduced  order  description  of  the 
structural  system,  actuator  and  sensor  locations.  The  vector 
X  is  the  estimated  state.  Adding  the  state  correction  term 
L(s  —  Hx)  forces  the  observer  model  to  track  the  measured 
states  of  the  structure.  Since  the  disturbance  is  unknown.,  it 
is  not  included  in  the  observer. 

The  observer  gain  matrix  L  can  be  synthesized  by  a  nunv 
ber  of  techniques.  If  covariance  matrices  of  the  noise  and 
disturbance  processes  in  (2.1)  are  available,  the  Kalman  Fil¬ 
ter  can  be  constructed.*'*'  The  Kalman  Filter  provides  an 
optimal  balance  of  observer  performance  and  noise  rejection; 
however.,  a  first  order  observer  is  required.  Since  a  structure 
is  represented  with  second  order  models,  it  seems  natural 
to  choose  a  second  order  observer  model  for  estimation  of 
structural  states.  The  second  order  observer  is  described 
below. 

2.2  SwQa.d-Qr.dfir-Qhgemr  Model 

A  linear  observer  model  could  be  derived  by  adding  a  state 
correction  term  to  a  reduced  order  form  of  (2.1).,  such  that 
the  estimated  states  q  and  q  are  computed  from 

Mq  +  Dq  +  Kq  =  Ef  -F  Bu  -F  ML,! 

q(0)=0,  4(0)  =0  (2-4) 

where  M,  D  and  K  represent  a  reduced  order  model  of  the 
structure  and  7  is  a  state  correction  term  of  the  form 

7  =  *-(H,q-FH,4) 

The  second  order  observer  form  given  by  (2.A)  may  be  solved 
efficiently  by  keeping  the  control  and  state  dependent  state 
correction  terms  on  the  right-hand-side  (RHS)  of  the  equa¬ 
tion.  This  permits  the  symmetry  and  sparsity  of  the  observer 
mass,  damping  and  stiffness  matrices  to  be  exploited  by  the 
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computational  algorithms.  References  4  and  5.  present  a  par¬ 
titioned  solution  procedure  for  this  type  of  equation. 

From  (2.4)  one  observes  the  absence  of  Lt.  which  must  be 
null  for  a  second  order  observer  to  be  constructed.  The  a^ 
sence  of  Li  is  needed  to  establish  the  identity  relation  q  =  q. 
A  second  order  system  is  written  in  first  order  form  by  us¬ 
ing  the  relation  that  the  time  derivative  of  position  is  equal 
to  the  veleocity  as  shown  in  the  top  row  of  equation  (2.2). 
To  transform  a  first  order  system  to  a  second  order  one. 
the  identity  relation  must  exist.  The  effects  of  Li  =  0  are 
described  in  the  next  section. 


3.  Stability  and  Performance  of  Qbservera 

To  study  the  ability  of  the  observer  to  predict  the  states  of 
the  structure,  the  equation  for  the  error  between  the  actual 
states  and  the  predicted  states,  e  =  (q  -  q)  is  examined.  To 
simplify  the  discussion,  we  consider  an  unreduced  observer 
A=A,  B  =  B,  H=H.  The  deterministic  error  is  given 
by 


From  (3.1).  it  is  seen  that  the  error  asymptotically  goes  to 
zero,  provided  the  matrix  (A  —  LH|  is  stable.  The  next 
section  describes  the  stability  limitation  of  second  order  ob¬ 
servers  using  a  simple  singte-degree-of-freedom  model. 


3.1  Observer  Stability  for  a  SDOF  Model 


A  deterministic  single-degree-of-freedom  (SDOF)  model  con¬ 
sisting  of  a  spring  (k),  a  damper  (d)  and  a  mass  (m)  is  used 
in  this  section  to  highlight  differences  in  stability  between  the 
first  order  and  second  order  observer  models.  The  system 
equations  in  first  order  form  may  be  written  for  the  structure 
as 


X  = 


,—kfm  —d/m 
and  for  the  observer  as 


X  + 


0 

1/m 


f-l- 


4  _  f  1  -  LiH, 

*  ■■  -k/m  -  USi  -d/m  -  L,H, 


1  0  ' 

ib/m 

u  ( 

0 

x  + 

,1/m 

0 

6/m 


1». 


LiH^  L|H, 

l,h. 


(3.2) 

f 

(3-3) 


The  stability  of  the  observer  can  be  determined  from  the 
poles  of  the  error  equation 


e  = 


— LiH^  1  —  LiH« 

—k/m  — — d/m  —  lj^'EL^ 


The  poles  of  (A  -  LH)  in  (3.4)  are 

Al;|  =S  ff  ±  jw 


{3-4) 


(3.5) 


where 


.  _  ~(^/tt>  -I-  LaH»  +  LiH<) 


w"  =  (4*  +  2L,Hdd  +  4mL,Hi  -  m(L,Hi  -t-  LjH,)’ 
-2LiH„d  —  4LiH„l:  -  d’/m]/4m 

The  pole  locations  given  by  (3.5)  show  the  effect  of  the  ob¬ 
server  gains  on  the  error  between  the  actual  and  predicted 
states.  The  Li  gain  increases  the  rate  of  decay  of  the  error 
when  position  measurements  are  used.  The  Li  gain  also  ef¬ 
fects  the  frequency  of  the  error  response  when  velocity  mea¬ 
surements  are  used.  The  L,  gain  uses  the  velocity  mea¬ 
surement  to  increase  the  rate  of  decay  and  the  L,  gain  uses 
position  measurement  to  effect  the  frequency  of  the  error 
response. 

From  the  above  considerations,  distinct  differences  are  seen 
in  the  first  order  and  second  order  observers  (L|  ==  0).  The 
first  order  observer  can  produce  a  stable  reconstruction  error 
utilizing  position  and/or  velocity  measurements.  The  second 
order  observer  poles  are  given  by 

-{d/m  +  L}H,) 

(T  =  ' 

2 

3  4k +■  4mL]H4  -  m(L,B[,)’  -  2L]H«d  —  (P/m 

W  —  . 

4m 

which  show  velocity  measurements  must  be  available  to  aug¬ 
ment  the  error  decay  rate.  For  example,  if  the  structure  was 
undamped,  (d  s  0),  and  no  velocity  measurements  were 
made  (H,=0)  then  the  first  order  observer  would  have  the 
real  part  of  the  poles  located  at 

Thus  the  first  order  observer  would  be  stable.  However, 
the  second  order  observer  would  be  unstable,  a  =  0.  Even 
though  stability  is  gained  by  a  small  amount  of  damping, 
(d  ^  0),  the  second  order  observer  would  have  poor  per¬ 
formance  without  augmenting  the  damping  through  velocity 
feedback.  Observer  performance  is  discussed  in  the  next  sec¬ 
tion. 

3.2  Performance  Considerations 

The  performance  of  the  observer  depends  on  the  eigenvalues 
and  eigenvectors  of  the  matrix  [A-LH|.  The  eigenvalues  de¬ 
termine  the  speed  and  rate  of  observer  convergence.  Rule  of 
thumb  choices  for  the  eigenvalues  should  be  somewhat  larger 
than  the  closed  loop  system  [A  +  BF|.  but  not  exceedingly 
so.  to  prevent  problems  due  to  high  frequency  noise.  The 
eigenvalues  and  eigenvectors  of  the  observer  matrix  can  be 
placed  to  maximize  noise  and  disturbance  rejection.  Because 
the  second  order  observer  restricts  the  design.  Li  =  0.  some 
of  the  freedom  in  placing  the  eigenvalues  and  eigenvectors  is 
lost. 

Robust  methods  for  designing  second  order  observer  gains 
remains  a  fruitful  area  of  research.  The  results  herein  have 
synthesized  Kalman  Filter  gains  and  subsequently  ignored 
the  Li  gain.  This  approach  may  or  may  not  lead  to  a  stable 
observer.  If  "L,  is  not  stablizing  it  must  be  augmented.  Even 
if  L7  is  stablizing  some  loss  of  performance  is  expected,  par- 
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ticularly  in  terms  of  noise  rejection.  However,  this  may  be 
a  reasonable  penalty  for  the  increased  computational  speed 
gained  by  using  a  second  order  observer  model  which  could 
be  translated  into  reducing  the  level  of  unmodeled  dynam¬ 
ics.  The  model  error  (uncertainty)  would  be  the  same  for 
the  first  or  second  order  observer.  Future  research  is  needed 
to  determine  the  robustness  characteristics  of  second  order 
observers. 


4.  Computational  Requirements  for  Simulation 

Solution  of  the  CSI  equations  is  typically  performed  using 
digital  computations.  It  is  this  consideration  that  leads  to 
the  study  of  second  order  observers  for  CSI  technology.  As 
shown  in  the  following  paragraphs,  the  second  order  observer 
provides  the  potential  for  larger  observers  and/or  faster  com¬ 
putational  solutions  than  can  be  realized  with  the  first  order 
observer 

4il  Flrtl.Qcdgr  Obitmr  Salatlan 

The  first  order  observer  given  by  (2.3)  may  be  solved  by 
several  methods.  One  popular  method  is  to  compute  the 
matrix  exponential  of 

A.  =  (A  +  SF  -  LH)  (4  •  1) 

so  that 

x'^‘  =  ♦(/i)x"  +  r(/i)  (Er  +  Lz")  (4 . 2) 

where 

i(h)  =  e^'\  T{h)  =  ' 

Jo 


and  h  is  the  temporal  step  size. 

Defining  N  as  the  number  of  structural  degrees  of  freedom, 
then  i{h)  is  a  2N  by  2N  matrix. 

Because  i{h)  is  computed  once  for  time  invariant  systems, 
the  matrix  exponential  computation  does  not  significantly  im¬ 
pact  the  total  time  required  for  a  long  simulation.  However, 
computing  the  matrix  exponential  for  large  systems  does 
cause  accuracy  and  storage  problems.  4(A)  occupies 
storage  tocations  since  the  matrix  is  typically  not  symmet¬ 
ric  or  sparse.  Independent  of  the  number  of  sensors.  (4.2) 
requires,  as  a  minimum,  multiplication  of  4(A)  by  a  vector 
at  each  time  step.  This  represents  4TP  operations  at  each 
step  of  the  simulation. 

An  alternative  approach  to  the  matrix  exponential  route  is  to 
discretize  the  equations  of  motion  in  time  to  derive  difference 
equations.  This  approach  has  been  used  by  the  present  au¬ 
thors  in  Refs.  4  and  5.  Midpoint  implicit  integration  formulas 
were  used  to  discretize  (2.3)  to  derive  a  linear  equation 

=;  g»+‘/* 

x’*^‘  =  2x"+‘/»-x"  (4-3) 

where 

S  =  I-Ja.,  g*  J(Ef^‘/*-l-Lz"+‘/’)-f-x" 

2  2 


To  solve  (4,3)  an  L-U  decomposition  is  performed  once  for 
time  invariant  systems  and  subsequently  a  lower  and  upper 
triangular  system  is  solved  at  each  time  step.  Since  the  L-U 
decomposition  of  S  is  not  sparse  or  symmetric.  47V*  storage 
locations  are  required.  In  addition,  the  two  triangular  sys¬ 
tem  solutions  require  47V*  operations.  Thus,  the  first  order 
observer  requires  the  same  computational  resources  for  both 
the  matrix  exponential  approach  and  the  time  discretization 
approach. 

4.2  Second  Order  Obierver  Solution 

The  second  order  observer  model  given  in  (2.4)  can  be  solved 
using  the  time  discretization  approach  as  presented  in  Refs. 

4  and  5.  A  summary  of  the  procedure  is  presented  herein. 

We  express  a  set  of  the  mid-point  implicit  formulas  with  the 
step  size  A: 

q"+‘/*  =  q"  +  6  =  A/2 

,  (4-4) 

-n+i  _  2q»+‘/»  _ 

The  selection  of  the  mid-point  implicit  formula  (or  the  trape¬ 
zoidal  rule)  for  controlled  structures  is  due  to  its  minimal 
frequency  distortion  and  no  numerical  damping  characteris¬ 
tics. 

Implicit  time  discretization  of  (2.4)  using  (4.4)  yields  the 
following  difference  equation; 

■  Sqi***/*  _  g*^*/* 

S  *  M  +  dD  -f  6*K 

+M(q’*  -f  6tC)  +  SteC  ^  ■  ’ 

-n+i  _  -  q" 

From  (4.5)  it  can  be  seen  that  and  are  re¬ 

quired  to  numerically  solve  for  q""^*/*.  The  partitioned  so¬ 
lution  procedure*'*,  uses  equation  augmentation  to  predict 
u"*‘/*  and  7"'*'‘/*  thereby  maintaining  the  symmetry  and 
sparsity  of  the  S  matrix  even  after  L-U  decomposition.  For 
the  second  order  observer,  S  is  an  TV  by  TV  matrix.  If  the 
bandwidth  of  S  is  proportional  to  TV  by  a  constant  a: 

Bandwidth  =  aTV 

then,  only  aTV*  storage  location  are  needed.  Most  impor¬ 
tantly.  only  2TV(aTV  +  1)  operations  are  needed  for  the  two 
triangular  system  solutions  at  each  time  step. 

Comparing  the  second  order  observer  minimum  solution  time 
to  the  first  order  observer  minimum  solution  time  yields 

(2ctTV*  +  2TV)  a-f-^ 

4TV*  2 

Note  this  is  an  approximate  count  of  the  number  of  oper¬ 
ations  as  the  right-hand-side  of  (4.2)  and  (4.5)  require  ad¬ 
ditional  operations.  Nevertheless,  for  a  typical  bandwidth 
of  10  percent,  and  TV  >  1,  the  second  order  observer  re¬ 
quires  approximately  5  percent  of  the  number  of  operations 
as  does  the  first  order  observer.  (Reduced  order  observer 
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models  based  on  a  modal  description  of  the  structure  yields 
aN  =  l!)  Such  a  drastic  reduction  in  computations  may 
lead  to  new  applications  of  observers  in  CSI  technology. 


5.  Reaulti  and  Diacuggion 

To  evaluate  the  performance  of  the  second  order  observers 
numerically,  several  examples  are  presented.  The  first  exam¬ 
ple  is  relatively  simple,  a  beam  with  an  unreduced  observer 
model.  The  second  example  is  more  realistic  in  that  a  large 
truth  model  is  used  in  conjunction  with  a  reduced  order  ob¬ 
server.  The  encouraging  results  from  these  examples  prompt 
us  to  consider  serious  use  of  second  order  observers  in  CSI 
technology. 


Properties  Open  loop  frequenaes  (Hz) 

E  -  40E  +  6  Ib/in.^  fi  -  56.06 

G  -  2.4E  +  6  lb/in.2  k  “  233.22 


LI  Beam  Example 


p-  1.132E- 410-3^10. 


fa  -  556.73 


To  study  the  effects  of  approximating  a  first  order  observer 
by  a  second  order  observer,  the  beam  model  shown  in  Fig.  2 
has  been  used  for  numerical  studies.  The  beam  is  subjected 
to  a  step  load  for  0.002  seconds  and  a  regulator  control  sys¬ 
tem  is  activated  at  t=0.01  sec.  A  finite  element  model  was 
constructed  with  8  planer  beam  elements  to  form  a  27  de¬ 
gree  of  freedom  representation  of  the  beam.  A  three  mode 
modal  space  control  law  was  used  with  the  performance  con¬ 
straint  that  the  vibration  arrrplitude  must  be  less  than  0.025 
in.  within  0.1  sec.  after  the  control  system  is  activated.  Lat¬ 
eral  position  and  velocity  measurements  were  made  at  each 
of  the  three  locations  indicated  in  Pig.  2  for  a  total  of  6  mea¬ 
surements.  A  Kalman  Filter  was  constructed  to  predict  the 
unmeasured  states  of  the  system.  Results  for  the  unreduced 
structure  and  observer  are  shown  in  Fig.  3.  The  observer, 
shown  by  the  dashed  line,  rapidly  converges  to  the  true  po¬ 
sition  of  the  beam  lateral  deflection  (measured  at  the  point 
of  loading). 

To  determine  the  viability  of  a  second  order  observer,  L| 
was  set  equal  to  zero  and  the  observer  equation  was  solved 
in  second  order  form.  The  response  of  the  second  order 
observer  is  shown  in  Fig.  4.  The  second  order  observer  is 
slower  to  converge  to  the  actual  beam  deflection  than  the  first 
order  observer.  Nevertheless,  the  second  order  observer  did 
converge,  thus,  the  observer  stability  was  maintained  when 
Li  was  neglected. 

The  beam  response  with  the  control  law  based  on  a  perfect 
observer  (all  states  are  reconstructed  with  no  error),  the  first 
order  observer  and  the  second  order  observer  is  presented  in 
Fig.  5.  Although  the  second  order  observer  produced  no- 
.’iceable  performance  degradation  in  the  initial  time  after  the 
control  system  was  activated,  it  achieved  nearly  the  same 
level  of  vibration  attenuation  after  t=0.1  sec.  as  did  the  per¬ 
fect  observer.  Thus,  the  second  order  observer  is  quite  viable 
for  this  example  where  both  position  and  velocity  measure¬ 
ments  were  available. 


f4 . 2693.6 

Figure  2.  Pinned-Pinned  Beam  Structure 


Time,  sec 

Figure  4.  Beam  and  Second  Order  Observer  Response 


5 


Figure  5.  Comparison  of  Beam  Response  with  Different 
Observers 

5.2  Earth  Pointing  Satellite  Example 

A  more  realistic  example  of  spacecraft  being  studied  for  ac¬ 
tive  vibration  control  is  the  Earth  Pointing  Satellite  (EPS) 
shown  in  Fig.  6.  This  model  is  a  derivative  of  a  geostationary 
platform  designed  for  study  of  Earth  Observation  Sciences 
(EOS).  Two  flexible  antennas  are  attached  to  a  truss  (bus). 
Typical  missions  involve  pointing  one  antenna  to  earth,  while 
tracking  with  the  other  antenna. 

The  truss  has  a  three  meter  square  cross  section,  it  con¬ 
sists  of  51  mm  diameter  by  1.59  mm  wall  thickness  graphite 
epoxy  tubes.  The  modulus  of  elasticity  and  mass  density  of 
the  tubes  are  275.9  E-l-09  fi/W  and  3250.0  KK/M^  respec¬ 
tively.  Although  the  antennas  have  the  same  tube  dimensions 
as  the  truss,  nonstructural  mass  make  the  effective  tube  den¬ 
sity  =  9750.0  Kg/M*  for  the  two  antennas.  The  finite  ele¬ 
ment  representation  of  the  EPS  consisted  of  570  degrees  of 
freedom.  Table  1.  lists  the  first  20  frequencies  of  the  EPS 
structure. 


Table  1.  EPS  Vibration  Frequencies  (Hz.) 


1. 

0.000. 

2. 

0.000 

3. 

0.000. 

4. 

0.000 

5. 

0.000. 

6. 

0.000 

7. 

0.242. 

8. 

0.406 

9. 

0.565, 

10. 

0.656 

11. 

0.888, 

12. 

0.888 

13. 

1.438, 

14. 

1.536 

15. 

1.77  F, 

16. 

1.776 

17. 

3.026, 

18. 

3.026 

19. 

3.513. 

20. 

3.531 

Figure  7.  EPS  Antenna  and  Second  Order  Observer 
Response 


To  study  the  viability  of  second  order  observers  for  this  struc¬ 
ture.  sensors  were  located  on  the  15  M  antenna  hoop  shown 
in  Fig.  6  to  measure  the  position  and  velocity  of  the  antenna 
hoop.  In  addition,  sensors  were  located  at  the  center  of 
gravity  (CG)  to  measure  the  spacecraft  attitude  and  attitude 
rate.  The  number  of  measurements  used  in  the  construcu- 
tion  of  Kalman  Filter  gains  varied  from  10  to  20  to  create 
three  different  reduced  order  observer  models.  Again,  the 
second  order  observer  was  derived  by  neglecting  the  Lt  gain 
which  can  result  in  an  unstable  observer  for  some  problems. 
The  observer  was  studied  independent  of  a  feedback  control 
law  by  simply  applying  an  impulsive  loading  to  the  open  loop 
structure.  An  impulse  was  applied  as  an  initial  angular  ve¬ 
locity  about  the  z-axis  of  100.0  rad/sec  between  the  15  M 
antenna  and  the  truss.  Note  that  this  excitation  will  excite 
both  rigid  body  and  flexible  vibrations  of  the  EPS. 

Figure  7  shows  the  structure  and  observer  displacement  re¬ 
sponse  for  15  modes  in  the  observer  model,  and  a  full  570 
degree  of  freedom  model  of  the  EPS.  Although  the  observer 
is  stable,  considerable  error  exists  at  the  higher  frequencies. 
Figure  8  shows  the  error  between  the  EPS  states  and  the  ob¬ 
server  states  as  the  number  of  modes  in  the  observer  model 
was  increased  from  10  to  20.  These  results  show  the  im¬ 
portance  of  larger  observers  in  state  estimation  of  realistic 
spacecraft. 
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Figure  8.  Reconstruction  Error  Convergence  for  EPS 
Observers 


a.  Concluding  Remarks 

Classical  multivariable  control  observer  gain  synthesis  algo¬ 
rithms  produce  first  order  observer  models.  Results  have 
been  presented  which  show  that  approximating  the  first  or¬ 
der  observers  by  a  second  order  observer  can  be  successfully 
carried  out  if  velocity  measurements  are  available. 

This  paper,  in  conjunction  with  previous  works  by  the  au¬ 
thors.  has  shown  that  second  order  observer  models  are 
computationally  advantageous.  The  increased  computational 
speed  can  be  translated  to  larger  observers  and/or  faster 
sampling  rates.  Larger  observers  allow  the  designer  to  con¬ 
trol  more  ‘modes'  of  the  structure  which  is  increasingly  im¬ 
portant  for  future  spacecraft  missions.  On  the  other  hand, 
if  the  designer  chooses,  he  may  translate  the  increased  com¬ 
putational  speed  into  faster  measurement/control  updates. 
This  may  prevent  phase  distortion  in  some  applications  and 
may  actually  enable  observer  based  controllers  when  large 
bandwidths  are  necessary. 

Advances  in  CSI  technology  will  occur  by  exploiting  the  phys¬ 
ical  attributes  of  structures  and  structural  models.  This  pa¬ 
per  should  serve  to  stimulate  interest  in  the  use  of  second 
order  observers  for  state  estimation  of  structures.  Second  or¬ 
der  observers  may  prove  sub-optimal  as  compared  to  the  first 
order  observer,  nevertheless,  practical  considerations  such  as 
computational  speed  may  be  the  decisive  factor  in  developing 
CSI  technology.  More  research  is  needed  to  determine  if  full 
state  feedback  is  the  control  law  of  preference  for  controlled 
spacecraft.  If  the  answer  is  affirmative,  the  second  order  ob¬ 
server  promises  to  play  an  important  role.  However,  much 
research  is  still  needed  in  the  areas  of  directly  synthesizing 
second  order  observer  gains  and  on  determining  robustness 
of  the  second  order  observer. 
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ABSTRACT 

This  paper  addresses  computatiortal  stability  and  implemen¬ 
tation  aspects  of  a  partitioned  computational  procedure  that 
has  been  developed  for  control-structure  interaction  analysis. 
The  procedure  enables  the  analyst  to  conduct  the  interaction 
analysis  by  utilbing  two  modular  single-field  analysis  pack¬ 
ages:  an  active  control  synthesis  package  and  a  structural 
dynamics  analysis  package  The  paper  first  addresses  imple¬ 
mentation  issues,  via.,  several  ways  of  enhancing  both  ac¬ 
curacy  and  the  computational  stability  margin,  modular  pro¬ 
gramming  of  the  procedure,  and  the  selection  of  time-stepping 
formulas.  In  particular,  the  present  analysis  and  implementa¬ 
tion  considerations  suggest  using  the  implicit  mid-point  for¬ 
mula  for  integrating  the  structures  and  the  control  system 
generalized  forces.  The  stability  analysis  indicates  that  the 
maximum  stable  step  size  is  not  bound  by  the  frequencies  of 
the  structure,  but  rather  by  the  position  feedback  strength  of 
the  control  forces. 

1.  Introduction 

Realistic  analysis  of  active  control-structure  interaction 
(CSI)  problems  pose  a  formidable  challenge  both  to  the 
dynamist  amd  the  control  scientist.  The  emerging  need  for 
real-time  simulation  and  control  of  CSI  systems  will  engen¬ 
der  a  new  activity  called  “computational  controls"  to  meet 
this  challenge.  The  prevailing  practice  in  CSI  simulations 
is  by  and  luge  limited  to  a  reduced  order  model  of  struc¬ 
tures  based  on  modal  representations  together  with  a  lim¬ 
ited  number  of  sensors  and  actuators  (see,  e.g.,  Likins,  1970; 
Balas,  1978;  Roberson,  1979;  Skelton,  1982;  Meirovitch  and 
Silverberg,  1983;  Horta,  Juang,  Junkins,  1985).  Specifi¬ 
cally,  the  control  laws  are  expressed  in  terms  of  the  gen¬ 
eralized  coordinates  and  their  time  derivatives  which  are 
computed  using  state  estimators  if  full  state  feedback  con¬ 
trol  is  used.  The  resulting  closed-loop  system  equations  are 
usually  cast  in  first-order  form;  this  has  been  the  prevailing 
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practice  since  modern  control  theory  has  been  almost  ex¬ 
clusively  developed  for  the  first-order  form  (  e.g.,  Kalman 
and  Bucy,  1961;  Kwakernaak  and  Sivan,  1972;  Arnold  and 
Laub,  1984). 

Typically,  simulation  tasks  for  CSI  problems  involve  sev¬ 
eral  computational  elements  and  discipline-oriented  models 
such  as  structural  dynamics,  control  law  synthesis,  state  es¬ 
timation,  actuator  and  sensor  dynamics,  thermal  analysis, 
liquid  sloshing  and  swirling,  environmental  disturbances, 
and  maneuvering  thrusts  and  torques.  Because  each  of 
these  computational  elements  can  bo  large,  it  is  usually  not 
practical  to  assemble  these  computational  elements  into  a 
single  set  of  equations  of  motion  and  perform  the  analy¬ 
sis  in  its  totality,  which  will  be  referred  to  as  stmullaneous 
solution  approach.  First,  the  equation  size  of  the  total  sys¬ 
tem  can  be  simply  too  large  for  many  existing  computers. 
Second,  the  solution  of  the  coupled  interaction  equations 
may  destroy  the  sparsity  of  the  attendant  matrices,  thus 
requiring  excessive  computations  and  storage  space.  Most 
important  of  all,  any  changes  in  the  model  or  in  the  compu¬ 
tational  procedures  will  effect  many  of  the  required  analysis 
software  modules  and  hence  require  a  painstaking  software 
verification  effort. 

The  computational  procedure  which  is  described  in  the 
present  paper  has  been  motivated  to  alleviate  the  aforemen¬ 
tioned  difficulties  that  exist  in  the  simultaneous  solution 
approach.  First,  software  development  of  any  new  capabil¬ 
ity  is  costly  and  time-consuming;  thus,  if  at  all  possible,  it 
is  preferable  to  utilize  existing  single-field  analysis  modules 
to  conduct  the  coupled-field  interaction  analysis.  Second, 
the  tasks  for  model  generation  and  methods  development  of 
each  field  are  best  accomplished  by  relying  on  the  experts 
of  each  single-field  discipline.  In  order  to  accommodate 
both  the  software  considerations  and  the  single-fieid  exper¬ 
tise,  a  partitioned  (or  divide- and- conquer)  analysis  proce¬ 
dure  is  proposed  for  control-structure  interaction  analysis 
(Park,  1988;  Park  and  Belvin,  1988).  The  procedure  aban¬ 
dons  the  conventional  way  of  treating  the  CSI  problems  as 
one  entity.  Instead,  it  treats  the  structure  (or  plant),  the 
observer,  and  the  controller/observer  interaction  terms  as 
separate  entities.  Thus,  the  CSI  problem  'is  recognized  as  a 
coupled-field  problem  and  a  divide-and-conquer  strategy  is 
adopted  for  the  development  of  a  real-time  computational 
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procedure.  A  similar  concept  has  been  successfully  applied 
to  other  interaction  analyses  (Park.  Felippa  and  DeRuntz, 
1977;  Park  and  Felippa,  1983;  Zienkiewicz,  1984). 

The  proposed  partitioned  analysis  procedure  hinges  on  three 
software  and  computational  aspects.  First,  because  large- 
scale  simulation  of  interdisciplinary  problems  must  rely  on 
an  efficient  and  versatile  data  management  system,  the  data 
manager  is  used  to  handle  the  necessary  interprocessor  com¬ 
munications  among  the  single-discipline  analysis  modules. 
Second,  at  each  discrete  time  increment,  the  equations  of 
motion  for  each  discipline  are  solved  separately  by  consid¬ 
ering  the  interaction  terms  as  external  disturbances  or  ap¬ 
plied  forces.  Third,  when  necessary,  computational  stabi¬ 
lization  and  accuracy  improvements  are  introduced  through 
augmentations  and/or  equation  modifications.  It  is  impor¬ 
tant  to  note  that  such  partitioned  solutions  of  each  disci¬ 
pline  equations  can  be  carried  out  either  on  a  sequential  or 
parallel  machine  if  certain  message  passing  and  memory- 
conflict  issues  are  handled  appropriately. 


Section  3  introduces  an  equation  augmentation  technique 
to  derive  a  differential  equation  for  the  interaction  terms  ( 

1. e.  the  control  law  and  the  observer  state  coirection  force), 
so  that,  the  interaction  terms  are  obtained  by  solving  differ¬ 
ential  equations  rather  than  by  back  substitutions.  It  turns 
out  that  such  an  augmentation  improves  the  numerical  ac¬ 
curacy  of  the  coupled  CSI  problem.  Time  discretization 
of  the  coupled  CSI  equations  is  carried  out  in  Section  4. 
It  is  shown  that  a  general  canonical  form  of  the  equations 
of  motion  for  structures  and  the  state  estimators  leads  to 
a  computationally  attractive  discretization.  A  preliminary 
computational  stability  analysis  of  the  present  partitioned 
CSI  solution  procedure  is  covered  in  Section  5  and  some 
example  CSI  analysis  results  are  offered  in  Section  6.  Fi¬ 
nally,  concluding  remarks  and  further  remaining  challenges 
toward  making  the  real-time  CSI  analysis  and  simulations 
a  routine  practice  are  discussed  in  Section  7. 

2.  Motivations  for  Partitioned  CSI  Simulation 
Procedures 


Recently,  the  computational  need  and  the  physical  insight 
that  can  be  acr.ued  from  the  second-order  dynamic  equa¬ 
tions  have  motivated  several  investigators  in  control  com¬ 
munity  to  address  the  second-order  state  estimation  and 
control  law  issues.  They  include  the  analysis  of  the  second- 
order  system  equations  by  Hughes  and  Skelton  (1980), 
Hashemipour  and  Laub  (1987),  and  CSI  design  by  Oz  and 
Meirovitch  (1982),  Youssuf  and  Skelton  (1984),  Hale  et  al 
(1985),  Hafia  et  al  (1985),  Junkins  and  Rew  (1988),  Khot 
et  al.  (1987),  and  Belvin  and  Park  (1988,  1989),  among 
others. 

The  objective  of  the  paper  is  thus  to  describe  the  algo¬ 
rithmic  nature  of  the  partitioned  CSI  solution  procedure, 
its  implementation  aspects  and  computational  stability  and 
accuracy  characteristics.  To  this  end,  the  paper  is  orga¬ 
nized  as  follows.  The  discrete  equations  of  motion  for  CSI 
problems  are  presented  in  Section  2,  which  includes  the  dis¬ 
crete  equations  of  motion  for  structures  subjected  to  control 
forces. 


A  typical  control-structure  interaction  system  can  be  rep¬ 
resented  as  shown  in  Fig.  1  (e.g.,  see  Kwakernaak  and 
Sivan,  1972).  The  discrete  equations  of  motion  for  control- 
structure  interaction  systems  may  be  described  by 

Structure:  Mq  +  Dq -t- Kq  =  f- Bu Gw 

Sensor  Output:  z  =  Hx  -I-  v 

Estimator:  x  =  Ax  •+  Ef  -  Su  +  L(z  -  Hx) 

Control  Force:  u  =  Fx 

(2  1) 

where 


and 


H  =  (Hd  HJ 
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Figure  1.  Typical  Control/Structure  Interaction  System 


In  the  preceding  equations,  M  is  the  mass  matrix,  D  is 
the  damping  matrix,  K  is  the  stiffness  matrix,  f(i)  is  the 
applied  force,  B  is  the  actuator  location  matrix,  G  is  the 
dbturbance  location  matrix,  q  is  the  generalized  displace¬ 
ment  vector,  w  is  a  disturbance  vector  and  the  superscript 
dot  denotes  time  differentiation.  In  (2.1b),  z  is  the  mea¬ 
sured  sensor  output.  The  matrix  is  the  matrix  of  dis¬ 
placement  sensor  locations  and  H,  is  the  matrbe  of  velocity 
sensor  locations.  'Jhe  vector  v  is  measurement  noise.  The 
state  estimator  in  '2.1c)  is  assumed  either  to  be  based  on 
the  Kalman  filter  (Kalman,  1961;  Kalman  and  Bucy,  1961) 
or  based  on  a  Luenberger  observer  (1964)  if  the  system 
is  deterministic.  The  superscript  *  denotes  the  estimated 
states.  The  observer  r  governed  by  L,  the  filter  gain  ma- 


2 


trix.  For  the  special  case  where  Li  is  the  null  matrix,  a 
second  order  state  estimator  can  be  expressed  as 

Mq  +  Dq  +  Kq  =  f- Bu  +  MLa7  (2-2) 

where 

7  =  s  -  (Haq  +  H,q) 

This  simplification  is  possible  because  for  the  second  order 
observer,  q  =  q.  See  Belvin  and  Park  (1989)  for  a  more 
detailed  description  of  second  order  observers.  The  actua¬ 
tor  output,  is  a  function  r  the  state  estimator  variables, 
q  and  q  ,and  and  F3  are  control  gains  determined  for 
example  by  pole-zero  placement  or  from  the  solution  of  an 
optimal  control  problem. 

The  numerical  solution  of  (2.1)  begins  with  appropriate  ini¬ 
tial  conditions,  the  feedback  gain  F  and  t.he  filter  gain  L. 
Although  the  solution  of  the  Kalman  Filter  Riccati  equation 
to  obtain  the  observer  ^ains  L  (Hashemipour  and  Laub, 
1988)  remains  a  challenge  in  the  CSI  simulation  endeavor, 
this  task  is  defered  for  a  latter  exposition.  Hence,  it  is  as¬ 
sumed  steady  state  filter  gains  have  been  synthesized  prior 
to  the  simulation. 

It  should  be  emphasized  that  the  objective  herein  is  to  di¬ 
rectly  solve  the  coupled  equations  given  in  (2.1)  in  their 
natural  forms.  That  is,  to  exploit  the  second  order  form 
of  the  structure  equation  (and  also  the  observer  equation  if 
Li  =  0).  To  justify  this  objective,  the  simultaneous  solu¬ 
tion  approach  for  numerical  simulation  of  (2.1)  is  examined. 
First,  the  structure  equation  is  written  in  first  order  form 

X  =  Ax  +  Ef  -  Su  +  6w  (2  -3) 

Second,  the  the  iimuitaneoue  solutiori  approach  eliminates 
u  and  introduces  the  error  equation  by  the  deterministic 
form  of  (2.1)  as: 

so  that 

with  appropriate  initial  conditions. 

Of  course,  an  equivalent  second-order  form  for  (2.5a)  can 
be  expressed  from  (2.1)  as: 

Mq  +  (D  +  BFajq  4-  (K  +  BFijq  =  f -h  B(FiO,  +  Fje,) 

(2-5) 

and  if  Li  =0,  then  (2.5b]  is 

Me  +  (D  -1-  MLjH,  )e  -1-  (K  -f-  ML,Hj)e  =  0  (2-7) 

where 

e  =  <5i  =  q  -  q 


e  =  63  =  q  -  q 

It  is  noted  that  the  matrices  DF2  and  BF  t  in  the  close-loop 
model  equation  (2.6)  are  in  general  dense  and  not  symmet¬ 
ric.  In  addition,  the  matrices,  L2H,  and  L3H,i,  in  the  error 
equation  (2.7)  are  also  in  general  dense  and  not  symmet¬ 
ric.  Thus,  the  embedding  effects  of  both  the  controller  and 
the  stats  observer  are  seen  to  destroy  the  symmetry  and 
sparsity  of  the  open-loop  system  matrices,  M,D  and  K 
and  considerable  software  modifications  of  existing  struc¬ 
tural  dynamics  analysis  programs  would  be  required  for 
large-scale  CSI  simulation  purposes.  Thus,  a  partitioned 
solution  of  the  CSI  equations  is  proposed  to  maintain  the 
symmetry  and  sparsity  of  M,  D  and  K  which  enhances  the 
computational  eificisncy  of  the  simulation. 

3.  Partitioned  Solution  of  Control  Laws 

In  order  to  mitigate  the  software  and  algorithmic  difficulties 
associated  with  the  asymmetric  embedding  of  the  controller 
and  the  state  observer  into  the  close-loop  equations,  a  par¬ 
titioned  solution  procedure  (Park  and  Belvin,  1988)  has 
been  proposed  for  the  control  structure  Interaction  equa¬ 
tions.  The  exposition  that  follows  addresses  the  computa¬ 
tionally  advantageous  second  order  observers.  However  for 
completeness,  the  first  order  observer  solution  procedure  is 
included  in  the  Appendix. 

First,  instead  of  eliminating  u  from  (2.1a)  and  (2.1b)  via 
(2.1c),  the  control  law  is  differentiated  with  respect  to  time 
to  yield 

u  =  Fiq  -f  Fsq  (3  ■  1) 

Substituting  q  from  (2.2)  inio  the  above  equation,  one  ob¬ 
tains 


li  +  F3M~‘Bu  =  F2(M~‘p -h  L27) -I- Fjq  (3-2) 
where  the  generalized  rate  of  momentum  p  is  given  by 
^  =  (f-D^-Kq) 

Although  FsM"  ^B  is  in  general  a  full  matrix,  its  size  is 
relatively  small  as  the  size  of  u  b  proportional  to  the  num¬ 
ber  of  actuators  placed  on  the  structure.  As  a  result  of 
the  equation  augmentation  for  the  controller  (3.2),  one  can 
avoid  the  solution  of  the  asymmetric  equation,  (2.6),  by 
keeping  the  control  force  on  the  right-hand-side  (RHS)  of 
the  equation  via  prediction  with  (3.2). 

Similarly  for  the  observer  state  dependent  forcing  function 
7  one  derives 

7  +  H,L,7  =  i-H,M-‘(p-Bu)-H4  (3-3) 

Again  the  matrix  H,L3  is  in  general  not  sparse,  however 
its  size  is  only  proportional  to  the  number  of  measurements 
output  from  the  structure. 


Augmenting  (2.2)  by  (3.2)  and  (3.3)  the  following  set  of 
differential  equations  for  the  observer  state,  control  law  and 
state  correction  are  obtained 


fM  0  0' 

1  4  1 

D  0  0 

0  0  0 

<  u  >  + 

F,M-‘D-F,  I  0 

.0  0  0. 

I.T  J 

0  I 

K  B  -MLi  1  f  4  ^ 

FjM-'K  -Fjl,,  <  u  >  = 

-H,M"‘K 


FjM-‘f  1 

-  J 

{3  -I) 


Observe  that  the  solution  of  (2.1a)  and  (3.4)  can  be  carried 
out  by  a  judicious  employment  of  three  software  modules: 
the  structural  analyzer  to  obtain  q,  the  state  estimator  to 
obtain  q,  and  the  solver  for  the  interaction  ternu,  u,  and 
7. 


To  illustrate  how  one  may  proceed  to  solve  for  the  structure 
(2.1a),  the  second  order  observer  (2.2)  (recall  q  =  q),  and 
the  interaction  terms  (3.2)  and  (3.3),  by  the  present  parti¬ 
tioned  procedure,  the  following  solution  steps  are  offered: 

Predict  q;  =  q”*  +  iq" 

(3-5) 

Solve  for  u,  7  Use  the  lower  2  equations  of  (3.4). : 

yn+l/i^  ^n+l/Z 

Solve  for  q,q  :,  = 


trapezoidal  rule)  for  controlled  structures  is  due  to  its  min¬ 
imal  frequency  distortion  and  no  numerical  damping  char¬ 
acteristics  (Dahlquist,  1963;  Newmark,  1959;  Park,  1988). 
It  is  very  important  to  minimize  numerical  damping  when 
studying  control  structure  interaction. 

Implicit  time  discretization  of  (3.8)  by  (4.1)  yields  the  fol¬ 
lowing  difference  equation  for  the  structure: 


'  Sq'*'^‘/2  =  g-'+Us 
S  =  M  +  -1- 


g«+i/2  _  52(fn-(-l/2  _  Bu«+i/2)  jvl(q»  +  Sq”) 
•f(fDq'*  +  <S^Gw'‘+U2 

q"+'  =  2q'“*'‘/'*  -  q'*,  =  (q"'*’*''*  -  q'*)/^ 

(4.2) 


From  (4.2)  it  is  seen  that  only  u'*'*'U2  is  required  to  numer¬ 
ically  solve  for  the  states  of  the  structure.  The  procedure 
herein,  is  to  predict  q'*'*'^/’ 


and  use  z^+U^  to  solve  the  lower  two  equations  of  (3.4)  for 
u'‘+U2  and  7'‘+U2.  (Note  that  *"+^2  implies  measuring 
the  system  output  at  the  1/2  time  step.  If  this  is  not  pos¬ 
sible,  using  =  z”  will  produce  a  phase  shift  in  the 

observer  state  of  S  in'  time.) 

Subsequently,  (3.7)  is  solved  for  the  observer  state  via 


(3-7) 

Solve  for  q,q  :  -1-  -f-  Kq”"’*''^  = 

r+‘/2_Bu"+i/2  +  Gw'‘+‘/'^  (3-8) 

The  more  general,  and  less  computationally  efficient,  first 
order  observer,  (2.1c),  is  treated  in  the  Appendix. 

The  solution  of  q,  q,  q,  u,  and  7  by  (3.5)  -  (3.8)  is  usually 
carried  out  by  direct  time  integration  which  is  addressed  in 
the  next  section. 


S  =  M  -f  (SD  +  6*K 

■  |n+l/2  _  52(f  +  i/2  +ML27'‘+‘''’) 

-i-M(q'’  -f-  ^q")  +  iJDq’' 

^  ^  2^+172  _  -''+U2  ^ 

(4-3) 

Finally,  equation  of  (4.2)  is  solved  to  compute  the  structural 
response  at  each  time  step. 

To  predict  the  interaction  terms,  u  and  7,  the  lower  two 
equations  of  (3.4)  are  solved  using  implicit  integration  as 


4.  Time  Discretization  of  CSI  Equations 

Direct  time  integration  of  (3.5)  -  (3.8)  can  be  carried  out  ei¬ 
ther  by  an  implicit  or  explicit  formula.  Because  of  the  small 
step  size  restriction  imposed  on  any  explicit  integration  for¬ 
mula,  implicit  integration  formulas  will  be  employed.  (It 
should  be  mentioned  that,  when  massively  parallel  com¬ 
putations  become  widely  available,  the  programming  sim¬ 
plicity  of  explicit  formulas  become  so  attractive  th-'.t  one 
may  prefer  explicit  to  implicit  formulas  for  CSI  simulations. 
This  is  particularly  true  when  reduced  order  models  are 
used  which  filter  high  frequency  responses.)  We  express  a 
set  of  the  mid-point  implicit  formulas  with  the  step  size  h: 

(  q»+‘/3  =  q»  +  S  =>  A/2 

I  q"+U2,„^c.^^-«+i/2  (4.1) 

I  q'*+ ‘  =  2q“'''  -  q"  . 


g  ^'•+1/7  _  g''+U2 


(4-4) 


where 


’H 


r-l 


B 


+  5F3M 


I  +  SH„L2 


{ 


I  Fi-F,M-‘D-(5F,M-‘K  \ -n-n/2  . 


FjM 

H„M 


} 


0 

ggn+l/2 


} 


,  (  ,.n+ll3 

-n+1/2  _  J  “ 

\y 


~n+l/2 


The  selection  of  the  mid-point  implicit  formula  (or  the 
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Solution  of  (4.4)  at  the  half  time  step  permits  solution  of 
(4.3)  with  the  control  and  state  correction  forces  on  the 
right-hand-side  of  the  equation.  Since  a  prediction  step  is 
Involved,  one  typically  iterates  to  achieve  a  converged  so¬ 
lution  for  However,  as  shown  in  Section  6,  the 

augmentation  procedure  used  herein  produces  very  accu¬ 
rate  results  without  iterating  to  obtain  in 

most  instances.  Before  demonstrating  the  performance  of 
the  procedure,  the  stability  and  accuracy  of  the  method  is 
examined  in  the  next  section. 


Computational  stability  of  the  modal  form  of  CSI  parti¬ 
tioned  aquation  (5.4)  can  be  assessed  by  seeking  a  nontrivial 
solution  of 


(5  •  5) 

such  that 

|A|<1 

(5  ■  6) 

for  stability. 

5.  Computational  Stability  and  Accuracy  of  the 
Solution  Procedure 

Computational  stability  analysis  of  partitioned  procedures 
for  a  general  coupled  system  is  still  in  an  evolving  stage 
(Park,  1980;  Park  and  Felippa,  1983).  Hence,  the  analy¬ 
sis  herein  applies  the  relevant  results  from  Park  (1980)  and 
Park  and  Felippa  (1983)  in  the  present  stability  analysis 
of  the  partitioned  CSI  solution  procedure.  The  partitioned 
CSI  solution  procedure  presented  in  (4.1)  -  (4.3),  although 
discretized  by  implicit  time  integration  formulas,  may  suffer 
from  computational  instability  as  it  involves  extrapolations 
to  obtain  and  \  complete  stability  anal¬ 

ysis  of  the  partitioned  solution  procedure  for  the  coupled 
structural  dynamics,  observer  and  controller  equations  is 
difficult  to  perform  unless  the  observer  characteristics  H,  L 
and  the  controller  characteristics  B,F  are  specified.  Hence, 
the  analysis  that  follows  is  restricted  to  an  ideal  observer, 
i.e.,  TT  =  0,  so  that  only  (4.1),  (4.2)  and  the  first  row  of 
(4.4)  are  considered.  Furthermore,  a  restricted  form  of  the 
controller  is  assumed  (Belvin  and  Park,  1988):- 

u  =  »7Kq  +  fT-^(T^KT|‘''’T-‘q  with  B=I  (5 -I) 

where  rj  and  f  are  positive  scalar  coefficients  that  signify  the 
strength  of  the  velocity  and  position  feedback,  respectively, 
and  T  is  a  modal  matrix  defined  by 


Substituting  (5.5)  into  (5.4)  and  eliminating  p,  one  obtains 


J 


=  0 


(5  •  7) 


where 


J  = 


i(l  +  5fw)  •  (A  +  1)^ 
5’(A  +  1)’ 


4A((S’fi4/*  -  ipw’)  +  2fu/(l  -  A)  I 
■  (A  +  1)^  —  4A  J 
(3  3] 


In  order  to  test  the  stability  requirement  (5.6)  on  the 
cheiracteristic  equation,  i.e.,  det|J|  =  0,  one  transforms 
|A|  <  1  into  the  entire  left-hand  plane  of  the  z-plane: 

A  =  i-ti,  |A|  <  1  «=>  Re[z)  <0  (5-9) 


so  that 


J(z) 


where 


1 

(z^  -  2z  +  1) 


45^fw  +  45 
45^ 


i:z2  +  Az  +  0' 

4z^  ■+■ 

(5  •  10) 


B  =  4  +  Sriu^  -  45*fw^  +  4fw 
A  =  85*fw^  -  85t7W^  -  4fw) 

0  =  4577W^  —  45^fu;^ 


q  =  Tp,  T^MT  =  I, 
T^KT  =  A  =  diag  {w?,  w’,  . . .} 


Hence,  the  stability  polynomial  equation  for  (5.11)  is  ob- 
(5  •  2)  tained  by  setting  det|J|  =  0: 


If  structural  damping  is  neglected  (D  =  0)  and  every  de¬ 
gree  of  freedom  Is  controlled  by  (5.1),  then,  for  each  modal 
degree  of  freedom,  p,  and  modal  force,u,  the  following  equa¬ 
tions  are  obtained: 

fu  =  qa;’p-hf<.p 
(  p  -f-tj^p  =  -u 

Application  of  the  partitioned  CSI  solution  procedure  (4.3) 
-  (4.9)  with  Tf  =  0  to  solve  the  above  modal  equation  (5.3) 
yields 


p;+‘/^  =j,'*  +  5p" 

(1  -f-  =  (rjw’  -  5fw’)  -f  fwp" 

(1  -f-  5®w2)p'‘+>/3  =  -5’ur‘^’  +  p"  +  6r 

p«+i  ^  2p'‘+‘/3  -  p",  .  P-+1/2  = 
pn+l  -  2p'^+l/7  _ 

u'*+‘  =  +  fu;p’‘+‘ 

(5-4) 


(5^fw’-5*77w*-f  1)  z*+(5fw)  z+{S^ri  +  S‘^)ij‘^  =  0  (5  •11) 

A  test  of  the  polynomial  equation  (5.12)  for  possible  pos¬ 
itive  real  roots  by  the  Routh-Hurwitz  criterion  (Ganth- 
macher,  1959)  indicates  that  the  partitioned  procedure  as 
applied  to  the  modal  coupled  equation  (5.3)  give  a  stable 
solution  for  no  velocity  feedback  f  =  0  provided 


If  velocity  feedback  is  present,  the  allowable  step  size  for 

stability  increases  until  f  >  at  which  point  the  solu¬ 
tion  becomes  unconditionally  stable. 

The  stability  analysis  of  the  present  partitioned  CSI  proce¬ 
dure  as  applied  to  a  modal  form  of  the  coupled  equations 
indicates  that  the  position  feedback  dictates  the  allowable 
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step  size  for  stability.  Thus  the  highest  frequency  of  the 
controller  governs  stability,  not  the  highest  frequency  of  the 
structure.  Since  most  controllers  are  designed  with  reduced 
order  structure  models  that  ignore  high  frequency  dynam¬ 
ics  the  present  solution  procedure  is  not  unduly  restricted 
by  stability. 

The  step  size  must  also  be  chosen  based  on  accuracy 
considerations.  Although  the  midpoint  implicit  integration 
formulas  produce  no  artihcial  damping,  there  does  exist 
a  frequency  distortion.  The  apparent  frequency  to  true 
frequency  ratio.  Fa,  is  given  by 


n  ^  -i,  2x 

Fa  =  —  Tan  ‘  ( - T" 

2>r 


(5  •  13) 


where  N,  is  the  number  of  steps  per  cycle,  N,  =  (2x)/{Aw). 
Figure  2  shows  the  frequency  distortion  as  a  function  of  the 
number  of  steps  per  cycle.  There  must  be  18  steps  per  cycle 
to  produce  less  than  1  percent  frequency  error.  Thus,  the 
step  size  based  on  1  percent  frequency  error  is 


0.349 

(j 


(5  •  14) 


Comparing  (5.12)  to  (5.14)  one  finds  rj  >  32.84  before  sta¬ 
bility  governs  the  step  size  and  not  the  1  percent  allowable 
frequency  distortion.  Thus,  for  most  practical  considera¬ 
tions,  accuracy  of  the  present  integration  formulas  rather 
than  stability  govern  the  selection  of  the  integration  step 
size  h. 


Figure  2.  Frequency  Distortion  Using  Midpoint  Implicit 
Integration 


6.  Preliminary  Numerical  Experiments 

The  time-discretized  CSI  equations,  (4.2)-(4.4),  have  been 
implemented  into  three  modules:  the  structural  analyzer, 
the  state  estimator  and  the  solver  for  the  interaction  terms. 
The  examples  herein  have  concentrated  on  the  structural 
analyzer  and  the  control  force  interaction  term.  Additional 
examples  with  state  estimation  are  presented  in  Belvin  and 
Park  (1989), 
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Cantilever  Beam  Example 


The  first  numerical  example  is  a  beam  with  ten  finite  el¬ 
ements  and  an  actuator  placed  on  node  10  as  shown  Fig. 
3.  The  actuator  gains  have  been  determined  using  a  single 
mode  in  the  control  law.  The  beam  is  initially  bent  accord¬ 
ing  to  its  first  mode  shape  and  the  controller  must  regulate 
the  response  to  one  percent  of  its  initial  amplitude  within 
0.5  seconds.  Figure  4  illustrates  the  tip  displacement  re¬ 
sponse  and  the  control  force  (u)  versus  time.  To  assess  the 
elTectivcness  of  the  present  partitioned  solution  procedure, 
the  response  has  been  computed  using  both  the  conven¬ 
tional  and  the  present  technique  for  JV,  =  20  and  jV,  =  10. 
The  conventional  technique  does  not  use  equation  augmen¬ 
tation,  (3.2),  for  prediction  of  At  jV,  =  20  both 

procedures  yield  similar  results  as  shown  in  Fig.  5.  How¬ 
ever,  for  U,  =  10,  the  two  procedures  yield  slightly  dilTerent 
results.  We  have  also  computed  the  control  force  by  post¬ 
processing  Eq.  (2. Id)  instead  of  the  augmented  form  (3.2) 
or  (4.4a).,  Figure  6  compares  the  control  force  error  com¬ 
puted  by  the  present  stabilized  equation  (4.4a)  vs.  that  by 
post-processing  (2. Id)  for  step  sizes  of  20  and  10  samples 
per  response  cycle.  It  is  noted  that  the  present  partitioned 
solution  procedure  yields  far  better  accuracy  than  the  con¬ 
ventional  method. 


Figure  4.  Beam  Response 


Of  course,  one  can  eliminate  the  solution  errors  associated 
with  the  conventional  solution  scheme.  However,  this  re¬ 
quires  solving  the  CSI  equation  in  its  entirety  as  given  by 
(2.6)  and  (2.7),  which  cannot  be  carried  out  in  a  modular 
software  environment. 
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20  steps  /  cycle  1 0  steps  /  cycle 


Figure  5.  Effect  of  Integration  Step  Size  on  Beam  Re¬ 
sponse 


20stept/cyde  tOsleps/cyele 


Figure  6.  Beam  Control  Force  Prediction  Error 

To  illustrate  the  procedure  on  more  realistic  structures,  we 
have  performed  transient  resoonse  analyses  on  the  truss- 
beam  shown  in  Fig.  6.  The  truss  was  modeled  by  finite 
elements  with  one  Timoshenko  element  from  joint-to-joint. 
The  model  had  990  degrees  of  freedom.  The  truss  is  de¬ 
scribed  in  more  Cstail  in  Belvin  and  Park,  1988.  A  modal 
space  control  law  with  s'^ven  modes  was  used  to  suppress 
vibrations  of  the  beam  induced  by  the  loading  shown  in  Fig. 
7.  Both  position  and  rate  feedback  were  used  to  reduce  the 
vibration  amplitude  to  0.025  in.  within  10  seconds  after 
active  control  was  initiated. 


Figure  7.  Truss-Beam  Example 


Figure  8  shows  the  truss  response  and  Fig.  9  shows  the 
control  force  prediction  error  for  the  proposed  and  conven¬ 
tional  solution  procedures.  The  proposed  procedure  is  usu¬ 
ally  more  than  an  order  of  magnitude  more  accurate  than 
the  conventional  procedure  because  of  the  equation  aug¬ 
mentation  (3.2).  This  high  accuracy  removes  the  necessity 
of  iterating  during  the  prediction  step. 

Most  importantly,  the  proposed  technique,  which  exploits 
the  second  order  form  of  the  structure  equation,  can  be 
used  to  solve  this  990  degree  of  freedom  problem  without 
resorting  to  a  truncated  modal  model.  Thus  simulation 
can  be  efficiently  performed  with  “truth"  models  to  verify 
performance  and  robustness  of  control  laws  developed  from 
reduced  order  models.  It  is  this  feature  that  will  alleviate 
much  of  the  computational  difficulties  associated  with  the 
study  of  Controls/Structures  Interaction. 


Time,  sec 

Figure  8.  Truss-Beam  Response 


Force 

error 


Time,  sec 


Figure  9.  Truss-Beam  Control  Force  Prediction  Error 


7.  Summary 

A  partitioned  procedure  for  an  efficient  solution  of  control- 
structure  interaction  systems  has  been  presented.  The  de¬ 
velopment  of  the  present  partitioned  procedure  for  con¬ 
ducting  the  CSI  analysis  has  been  motivated  by  a  desire 
to  perform  such  analyses  by  assembling  several  modular 
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software  packages,  rather  than  embedding  additional  in¬ 
teraction  phenomena  either  into  a  structural  analysis  pro¬ 
gram  or  into  a  control-synthesis  program.  This  divide-and- 
conquer  computational  strategy  should  prove  increasingly 
important  when  additional  phenomena  such  as  large  slew¬ 
ing  motions,  thermal  transients,  fluid-tank  interaction  and 
other  environmental  disturbances  are  to  be  considered. 

The  CSI  simulations  based  on  modular  software  elements 
has  uncovered  several  theoretical  and  computational  issues. 
First,  the  availability  of  a  second  order  observer  model  is 
required  to  exploit  the  symmetry  and  sparsity  for  efRciency 
purposes.  Second  order  observers  are  discussed  in  Belvin 
and  Park  (1989)  with  the  application  of  the  present  proce¬ 
dure  in  mind. 

Second,  for  time  variant  systems,  the  solution  of  a  Ric- 
cati  equation  to  determine  the  controller,  u,  with  appropri¬ 
ate  terminal  conditions  and  the  solution  of  another  Rlccati 
equation  for  the  observer  equation  with  given  initial  con¬ 
ditions  can  pose  bottlenecks  in  real-time  CSI  simulations. 
Note  that  these  two  solutions  are  required  to  obtain  the 
matrices  F,  and  L.  Parallel  computing  can  potentially  re¬ 
move  the  aforementioned  bottlenecks  of  the  time  variant 
problem. 

The  present  partitioned  CSI  procedure  can  facilitate  the  use 
of  large-scale  structural  analysis-at  least  in  principle-  for 
contt  il-structure  interaction  analysis  both  by  the  structural 
dynamist  and  the  control  engineer.  It  is  anticipated  that 
real-time  CSI  simulations  will  become  routine  if  adequate 
advances  are  made  in  the  construction  of  reduced-order 
observers  and,  for  time  variant  problems,  if  substantially 
faster  parallel  solution  procedures  for  the  Riccati  equations 
become  available. 

Finally,  we  have  not  considered  the  intrinsic  dynamics  of 
both  the  actuator  and  the  sensor.  However,  since  the 
present  procedure  uses  a  differential  form  of  the  actuator 
and  sensor  equations  they  can  be  incorporated  into  the 
present  computational  procedure  without  too  much  diffi¬ 
culty.  Further  experiments  and  inclusions  of  more  realistic 
CSI  models  are  necessary  before  the  present  CSI  simulation 
procedure  can  become  a  production-simulation  tool.  This 
is  being  carried  out  at  present. 
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Appendix  -  First  Order  Observer  Solution 

The  first  order  observer  can  be  numerically  integrated  as 
described  below.  Implicit  mid-point  formulas  are  used  in 
the  time  discretization.  All  variables  are  defined  in  (2.1). 

The  first  order  observer  takes  the  form 

x  =  Ax  +  Ef-Du-f-L(z-Hx)  (A.i) 


Combining  like  terms,  we  derive 


it  =  A„x  +  Ef  +  Lz 


(A. 2) 


where 

A,= 

,-M~  (K-BFi) -M"‘(D-BF2)-L,H„J 
Time  discretization  yields 

(I  -  =  5(Er+'/^  +  Lz"+‘/^)  +  x"  (A.3) 

x""‘=2x'‘+‘/^-x"  (A.4) 

(A.5) 

Equations  (3.5  -  3.7)  would  be  replaced  by  (A.3)  in  the 
integration  procedure.  Then,  (A.5)  would  be  used  to  solve 
(3.8)  for  Che  structural  states.  The  computational  efflciency 
of  the  first  order  observer  (A.3)  is  discussed  in  Belvin  and 
Park  (1989). 
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A  computational  strategy  for  nonlinear  finite  element  computations  on  shared-memory  multi¬ 
processors  is  presented.  It  exploits  all  the  parallelism  inherent  in  the  finite  element  method.  Both 
iterative  and  direct  solution  methods  are  implemented  in  the  same  environment.  Explicit  computations 
are  carried  out  at  the  element  level.  Implicit  computations  are  processed  at  the  subdomain  level.  An 
element  coloring  scheme  is  used  to  eliminate  critical  regions  for  the  whole  class  of  explicit  computa¬ 
tions.  To  facilitate  load  balancing  among  the  processors  in  a  posteriori  nonlinear  problems,  a  dynamic 
remapping  of  the  processors  on  the  computational  tasks  is  introduced.  Numerical  experiments  are 
conducted  on  Alliant  FX/8  and  Cray2.  Very  high  rates  of  efficiency  are  achieved  on  both  multi¬ 
processors.. 


1.  Introduction 

Until  recently,  most  increases  in  the  speed  of  finite  element  computations  have  come  via  the 
speed  of  vector  processors.  Now,  the  true  potential  for  execution  time  improvement  lies  in 
concurrent  multiprocessors.  “A  multiprocessor  is  a  computer  with  two  or  more  central 
processing  units,  each  of  which  executes  instructions  independently  of  the  others  except  when 
a  processor  needs  to  communicate  or  synchronize  with  one  or  more  of  the  others”  [1].  Two 
basic  architectures  are  being  pursued:  (1)  the  local-memory  multiprocessors  where  each 
processor  has  his  independent  attached  memory  and  communicates  with  other  processors  by 
sending  messages  through  an  interconnect  sch  ne.  Examples  of  such  machines  are  Intel’s 
iPSC  and  JPL/Caltech’s  MARK  III  hypercubes;  (2)  the  shared-memory  multiprocessors 
where  the  processors  access  a  common  memory  via  some  form  of  interconnection  mechanism. 
The  Alliant  FX/8  and  Cray2  machines  fall  within  this  category. 

Farhat  et  ai.  [3]  have  designed  a  computational  strategy  based  on  a  direct  method  for 
solving  structural  mechanics  linear  problems  on  local-memory  multiprocessors.  Nour-Omid 
and  Park  [4]  have  proposed  a  parallel  implementation  of  a  preconditioned  conjugate  gradient 
method  for  the  solution  of  linear  systems  of  finite  element  equations  of  Caltech’s  hypercube. 

At  the  time  of  writing  this  paper,  and  with  the  exception  of  the  Connection  Machine  with 
its  65,536  processors,  shared-memory  multiprocessors  are  offering  a  much  larger  crunching 
number  power  than  local-memory  machines.  Since  it  is  still  not  clear  which  architecture  will 
dominate  the  next  generation  of  super-multiprocessors,  our  goal  is  to  fully  exploit  the 
computational  power  of  the  fastest  and  currently  available  machines.  We  are  particularly 
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interested  in  the  concurrent  supercomputers  which  consist  today  of  four  (Cray2)  to  eight  ^ 
(ETA-10)  interconnected  vector  processors  capable  of  working  simultaneously  on  the  same 
problem.  Hence,  even  though  the  algorithms  we  present  in  this  paper  are  suitable  for  finite  | 
element  parallel  computations  on  local-memory  multiprocessors,  their  computer  implementa- 1 
tion  is  tailored  to  fully  exploit  the  architectural  features  of  the  shared-memory  machines. 

In  order  to  achieve  the  goal  set  forth  above,  a  general  framework  for  parallel  nonlinear  I 
computations  on  shared-memory  multiprocessors  is  proposed.  This  framework  features  two 
mapping  techniques:  (1)  a  mapping  associated  with  element-by-element  explicit  computations  | 
and  (2)  a  mapping  associated  with  subdomain-by-subdomain  implicit  manipulations.  All  the  | 
computations  that  are  carried  out  at  the  element  level  and  all  the  numerical  algorithms  that 
are  based  on  matrix-vector  products  such  as  preconditioned  conjugate  gradient  and  dynamic  1 
relaxation  are  handled  almost  asynchronously.  Expensive  critical  regions  are  bypassed  byJ 
processing  the  elements  in  a  specific  order.  Two  levels  of  parallelism  are  embedded  in  this 
framework,  namely,  (1)  concurrency  at  the  outer  loop  and  (2)  vectorization  at  the  inner  loop.  1 
The  problem  of  achieving  load  balancing  among  the  processors  in  a  posteriori  nonlinear* 
problems  solved  via  the  combination  of  the  two  different  mappings  of  the  processors  on  the  . 
computati  mal  tasks.  Finally,  The  Force  [5]  is  used  to  produce  a  portable  code  among  this  class  J 
of  multiprocessors.  The  same  code  has  been  run  without  major  modifications  on  Alliant  FX/8 
and  Cray2.  I 

The  remainder  of  the  paper  is  organized  as  follows.  Section  2  presents  a  general  framework 
for  parallel  element-by-element  computations.  This  framework  preserves  the  vectorization 
level  of  parallelism  and  builds  on  top  of  it  a  concurrency  level.  In  Section  3  the  implementa- 1 
tion  of  numerical  iterative  algorithms  within  this  framework  is  discussed.  The  efficient 
implementation  of  a  concurrent  direct  method  is  also  described  in  Section  4.  It  is  used  as  an  > 
inner  loop  within  a  Newton-like  method  for  an  alternative  solution  of  a  posteriori  nonlinear  J 
problems.  For  this  case,  two  different  processor-mapping  schemes  are  combined  to  achieve  a 
load  balance  among  the  processors.  In  all  cases,  at  each  iteration  and  within  each  computa- 1 
tional  step,  fork/join  procedures  are  replaced  by  Bu  riers  [5],  so  that  overhead  costs  are* 
minimized.  Numerical  experiments  are  reported  in  Section  5  and  concluding  remarks  are 
offered  in  Section  6.  | 


2.  A  framework  for  parallel  EBE  computations 


Most  of  the  computations  involved  in  a  finite  element  analysis  are  carried  out  at  the  element  | 
level.  These  include,  for  example,  the  formation  of  element  stiffnesses  and  the  computation  of-* 
field  derivatives.  Consequently,  these  operations  can  be,  in  principle,  carried  out  in  parallel..^ 
without  any  synchronization.  Practically,  after  the  elemental  calculations  have  been  achieved.  J 
one  still  needs  to  satisfy  some  architectural  requirements  when  considering  the  local  accumula¬ 
tion  of  these  computations  on  a  specific  class  of  multiprocessors.  The  solution  of  a  system  ofl 
equations  constitutes  another  important  phase  of  a  finite  element  analysis.  It  would  be  veryJ 
natural,  especially  from  a  parallel  processing  viewpoint,  if  the  selected  numerical  solution 
algorithm  could  also  operate  at  the  element  level.  Generally,  this  is  the  case  for  iterativel 
solution  schemes  based  on  matrix-vector  products.  It  is  well  known  that  such  products  can  be^ 
achieved  without  the  need  for  assembling  the  matrix  or  the  vector.  However,  when  im-.* 
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plemented  on  a  shared-memory  multiprocessor,  some  of  the  element-by-element  (EBE) 
computations  may  lead  to  what  is  termed  critical  regions,  which  are  known  to  slow  down  the 
speed  of  parallel  computations.  This  phenomenon  is  illustrated  below. 

In  Fig.  1,  a  mesh  node  P  is  showr  attached  to  four  distinct  elements  E^,  E^,  E^,  E^. 

Let  Up  be  a  mathematical  unknown  at  node  P.  Typically,  Up  is  the  accumulation  of 
independent  elemental  contributions  uf\  A  simple  segment  of  fortran  code  that  evaluates 
Up  =  Sfrfj  would  be: 

UP  =  0 

DO  100  IE  =  1,4 

UE  •=FUNCTION(IE,AND_OTHER_PARAMETERS) 

UP  =  UP  +  UE 

100  CONTINUE 

For  this  example  case,  if  each  of  the  four  elements  is  assigned  to  a  different  processor  via 
the  index  IE,  each  processor  will  have  its  private  copy  of  the  temporary  work  UE,  and  the 
independent  quantities  i/Jf\  represented  here  by  UE,  will  be  evaluated  in  parallel  and  stored 
in  distinct  physical  locations  of  the  memory.  However,  the  four  running  processors  cannot 
correctly  update  in  parallel  the  value  of  Up,  represented  here  by  UP,  because  the  statement 
UP  =  UP  +  UE  is  recursive.  Such  a  portion  of  a  code  where  a  processor  needs  to  store  into  a 
memory  location  used  concurrently  by  another  processor  is  usually  termed  critical  region. 
Since  each  processor  reads  and  stores  in  UP,  explicit  synchronization  has  to  be  invoked.  This 
can  be  done  as  follows: 


UP  =  0 

DO  100  IE  =  1,4 

UE  =  FUNCTION(IE,  AND_OTHER_PARAMETERS) 

Critical  Section 
UP  =  UP  +  UE 
End  Critical  Section 
100  CONTINUE 

The  Critical  Section  construct  as  described  in  [5]  guarantees  that  only  one  process  at  a  time 
will  execute  the  block  of  code  nested  between  the  Critical  and  End  Critical  statements.  Hence, 


Fig.  1.  A  mesh  node  attached  to  four  elements. 


156  C.  Far  hat,  L.  Crivelli,  Nonlinear  FE  computations  on  shared-memory  multiprocessors 


i 


the  computations  are  serialized  at  this  level  and  each  processor  updates  sequentially  thej 
shared  value  UP  with  its  private  contribution  UE  so  that  a  correct  value  for  UP  is  output.  The 
critical  region  described  above  slows  down  the  speed  of  computations  in  two  different  ways.* 
First,  it  serializes  the  computations  at  this  level.  Second,  it  requires  a  synchronization! 
construct  that  constitutes  an  overhead.  Since  such  a  critical  region  may  occur  at  each  node  of  a 
finite  element  mesh,  the  aggregate  serializations  and  overheads  will  significantly  degrade  the! 
sought-after  speedup.  " 

Critical  regions  in  parallel  EBE  computations  result  from  the  fact  that  a  node  is  usually 
common  to  several  elements.  Since  element-level  computations  can  be  done  in  an  arbitrary  | 
order,  most  of  the  critical  regions  can  be  avoided  by  processing  the  discrete  elements  in  a 
sequence  where  no  two  of  them  are  adjacent.  This  idea  appeared  first  in  Berger  et  al.  [10]  in  • 
their  work  on  assembling  in  parallel  a  global  stiffness  matrix  on  a  shared-memory  multi-J 
processor.  It  was  then  reused  by  Hughes  et  al.  [6]  for  vectorizing  the  evaluation  of  nodal 
residuals  in  EBE  computations.  In  this  paper,  we  extend  its  application  to  various  types  oft 
asynchronous  element  processing  and  discuss  its  sensitivity  to  mesh  topology  as  well  as  its* 
impact  on  multiprocessing  efficiency.  - 

Consider  a  mesh  including  several  types  of  elements  (truss,  beam,  shell,  etc.).  Groups  G,  of  | 
elements  of  a  similar  type  are  first  defined.  Then,  each  group  G,  is  split  into  lists  L,  of 
internally  disjoint  elements  via  a  graph  coloring  scheme,  where  is  the  number  of  colors  t 
required  to  separate  G,.  The  nonnumerical  algorithm  that  performs  the  splitting  should  bej 
general-purpose  in  the  sense  that  it  should  apply  to  regular  and  irregular  two-  and  three- 
dimensional  meshes.  Moreover,  it  should  minimize  the  number  of  required  colors  which  isl 
the  same  as  the  number  of  unicolor  lists  L^,  and  hence— as  will  be  shown — it  should  minimize  * 
the  amount  of  necessary  synchronizations.  The  parallel  processing  of  the  mesh  elements  is  _ 
done  in  sweeps  as  the  discussion  demonstrates.  Within  each  group  G,,  the  lists  of  elements  L  | 
are  processed  one  after  the  other.  For  each  list  L^,  the  processors  are  mapped  asynchronously 
onto  the  scattered  elements  which  are  processed  in  parallel.  Accumulation  operations  such  as| 
UP  =  UP  +  UE  need  not  be  synchronized  within  the  same  list  L.  since  they  do  not  constitute! 
critical  regions.  This  is  because  no  two  elements  within  share  a  common  node  and  hence  no 
two  processors  will  operate  on  the  same  UP  within  .  Synchronization  is  needed  only  f 
between  two  sweeps  of  computations  that  correspond  to  the  processing  of  two  different  lists'* 
L^.  Hence,  if  denotes  the  total  number  of  nodes  within  a  group  G,,  bypassing  the  critical , 
regions  reduces  the  amount  of  synchronization  from  to  which  is  usually  less  than  lO.J 
Vectorization  of  EBE  computations  is  carried  out  as  explained  in  [6].  Within  each  unicoior  list 
Lj,  elements  are  assigned  to  processors  by  blocks  of  a  NREG,  where  a  is  an  integer  and'l 
NREG  is  the  number  of  available  vector  registers.  1 

In  ‘nummary,  parallel  processing  is  achieved  at  two  levels.  At  the  outer  loop,  blocks  of 
internally  disjoint  elements  are  processed  concurrently.  At  the  inner  loop,  EBE  computations  | 
within  a  block  are  fully  vectorized.  Synchronization  occurs  only  between  the  processing  of  two** 
distinct  sweeps  of  computations.  An  irregular  finite  element  mesh  with  17C0  elements  is  shown-t 
in  Fig.  2(a).  When  applied  to  this  mesh  the  coloring  scheme  yields  four  different  colors .J 
Therefore  the  mesh  elements  are  reorganized  for  parallel  computations  Into  four  distinct  lists 
Lj  of  internally  disjoint  elements,  each  containing  300  of  them  (an  integer  in  the  -figurel 
represents  a  color).  J 


Hence,  if  the  mesh  shown  above  were  to  be  analyzed,  hardware  synchronization  calls  would. 


1 


Fig.  2.  (a)  Coloring  of  an  irregular  finite  element  mesh. 

I 

'*  invoked  only  four  times  per  iteration  and  300  elements  would  be  processed  asynchronously 
litween  two  synchronization  points.  Clearly,  a  minimum  number  of  colors  means  a  minimum 
number  of  lists  each  containing  a  maximum  number  of  internally  disjoint  elements,  which 
Isults  in  a  maximum  ratio  of  parallel  work  done  per  processor /amount  of  synchronization 
overhead.  However,  the  number  of  colors  required  to  separate  a  mesh  is  generally  a  function 
'^f  the  connectivity  pattern  of  the  elements.  Basically,  one  needs  to  avoid  situations  where  a 
jrge  number  of  elements  share  a  common  node.  Fortunately  this  is  always  possible,  as 
illustrated  below.  Consider  the  finite  element  mesh  of  Fig.  2(b).  Because  36  elements  in  this 
|esh  share  a  common  node,  38  colors  and  therefore  38  lists  L^,  some  of  which  contain  only 
lie  element,  are  required  for  parallel  processing.  In  Fig.  2(c)  the  same  geometrical  domain  is 
remeshed;  the  total  number  of  elements  is  kept  approximately  the  same  but  a  different 
jeshing  technique  is  used.  In  this  case,  only  5  colors  and  therefore  5  lists  Lj  and  5 
synchronization  procedures  are  needed  for  parallel  processing;  it  is  therefore  far  more 
'Efficient.  The  organization  of  the  doubly  parallel  EBE  computations  is  summarized  in  Table  1. 


;  Parallel  iterative  solution  algorithms 

Discrete  equilibrium  equations  arising  from  finite  element  nonlinear  formulations  may  be 
ritten  in  the  general  compact  form 


r(tt,  p,e)  =  Q, 


(1) 
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Fig.  2.  (b)  Inefficient  meshing. 


generalized  displacements  (rotations,  temperatures 
c  )  at  the  nodes  of  the  discretized  geometrical  domain,  p  denotes  a  set  of  control  parameters’ 

past  history  of  the  generalized  deformation  gradients,  and  r  denotes  the 
esidual  vector  of  out-of-balance  generalized  forces  (moments,  fluxes,  etc)  Equation  fl) 
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'Able  1 

Organization  of  doubly  parallel  computations 
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split  I*  among  N^  processors  for  concurrent  computations 
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X  \\ 
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partition  into  blocks  for  vectorization  of  computations 

/  /M  \  \ 

/  /  V  \  \ 

block  block  Block 


The  Newton-Raphson  method  and  its  numerous  variants,  collectively  known  as  Newton¬ 
like  methods,  are  the  most  popular  class  of  methods  for  the  solution  of  (1)  on  conventional 
pomputers.  These  methods  can  embed  either  an  iterative  or  a  direct  algorithm  for  the  solution 
i>f  a  linearized  system  of  equations.  The  use  of  iterative  schemes  for  the  solution,  at  each  step, 
of  the  linearized  system  of  equations  has  two  desirable  advantages:  (1)  it  efficiently  exploits 
;he  sparsity  of  the  involved  matrices  and  therefore  requires  less  storage  than  di’-ect  schemes; 
(2)  it  provides  a  means  of  controlling  the  accuracy  of  the  solution.  The  preconditioned 
conjugate  gradient  (PCG)  has  emerged  over  the  last  decade  as  a  favorite  algorithm  for  solving 
large  sparse  systems  of  linearized  equations  on  sequential,  vector  [11, 12, 13],  and  parallel 
[14, 15, 16]  computers.  However,  conventional  Newton-like  methods  may  behave  poorly  near 
bifurcation  points  and  often  fail  to  handle  path-dependent  problems  such  as  plastic  flow. 
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where  the  stiffness  matrix  may  oscillate  wildly  as  the  solution  changes  by  small  amounts.  For 
such  problems,  explicit  dynamic  relaxation  (DR)  is  a  very  robust  iterative  computational 
strategy.  Since  one  would  like  to  select  the  right  strategy  for  the  right  problem,  we  have 
decided  to  focus  on  the  implementation  within  the  same  environment  of  both  Newton-like  and 
explicit  dynamic  relaxation  algorithms.  In  this  section,  we  consider  PCG  as  a  solver  for 
Newton-like  methods.  A  direct  solver  will  be'  presented  in  the  following  section. 

Newton-like  methods  for  solving  nonlinear  systems  of  equations  having  the  general  form 
r(y)  =  0  are  usually  related  to  the  following  iteration  scheme: 

For  /:  =  0, 1, 2, . . .  until  convergence  do: 

Solve  r\y^)x^  =  “Kj'J  , 

Set +  . 


In  structural  applications,  r'{y^)  becomes  the  stiffness  matrix  K{u,^)  evaluated  in  the 
displacement  state  u^.  The  quantities  and  ~r{y^)  become  respectively  the  vector  of 
unknown  displacement  increments  and  the  vector  of  out-of>balance  forces  hf{u^).  Given 
a  preconditioning  matrix  P  and  an  initial  approximation  Smq  to  the  solution  increment  8w,  a 
PCG  algorithm  generates  a  sequence  of  improved  approximations  hu^  to  which  corresponds  a 
sequence  of  residuals  r„  =  bf~K  hu„.  A  sequential  version  of  the  algorithm  specified  to  finite 
element  computations  is  summarized  in  Table  2. 

The  stiffness  K  is  usually  a  symmetric  positive-definite  matrix  assembled  from  elemental 
symmetric  positive-semidefinite  matrices  However,  it  is  well  known  that  since  K  is 
involved  here  only  multiplicatively,  it  needs  not  be  assembled  and  stored.  Let  denote  the 
contribution  of  the  eth  finite  element  to  the  assembled  vector  i;„  =  E'””  and  let  0“^^^ 
denote  the  localization  to  the  cth  element  of  v„  after  it  has  been  assembled.  It  follows  that  the 
quantity  v\Kv„  can  be  performed  by  accumulating  element  level  computations 


v'Kv  =2  , 

n  n  ^  n  n  ’ 


and  an  inner  product  of  two  finite  element  vectors  can  be  computed  element-by-element  as  in 


Table  2 

PCG  algorithm 


(5o)  Initialize 

Vo  =  ro  =  bf-Khuo 

(SJ  Iterate  =  ... 

If  ll''rt-ill  <  tolerance  terminate. 
Solve  Pr;_,  =  r„., 

y„  = 

Vn  =  (y,  =  /■;) 

«« = 

^  _  Compute  using  equilibrium  principle. 
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tjjjp  example  below 

|_t  *  _  y  a(ey  *{e) 

'n  +  l'n  +  l  ^  'n  +  l'n  +  1  • 

'  =  1 

j|is  important  to  note  that  in  both  cases,  one  of  the  two  vectors  still  needs  to  be  assembled 
Lifore  the  inner  product  is  performed.  The  combination  of  two  vectors  is  trivially  done 
element-by-element  as  shown  below 

I 


hinally,  if  P  is  Hughes’  preconditioner  [6]  or  a  simple  Jacobi  preconditioner,  the  entire  PCG 

Igorithm  can  be  applied  using  only  element-level  computations.  Consequently,  these  compu- 
tions  are  perfectly  parallelized  within  the  framework  discussed  in  Section  2.  Note  that  they 
are  also  naturally  vectorizable  within  each  process. 

I  Dynamic  relaxation  is  a  robust  iterative  method  for  solving  highly  nonlinear  systems.  Unlike 
lie  conjugate  gradient  method,  it  does  not  need  to  be  embedded  within  a  Newton  outer  loop. 
The  algorithm  solves  the  nonlinear  discrete  quasistatic  finite  element  equations 

*  r(a,/)  =  5(i/)-/=0 

jy  viewing  them  as  the  steady-state  solution  of  the  second-order  pseudo-dynamic  problem 
I  +  +  5(u)-/=0,  (2) 

I 

where  M  and  C  are  fictitious  mass  and  damping  matrices  constructed  in  a  way  that  achieves 
bmputational  efficiency  when  integrating  (2)  with  the  central  difference  scheme.  To  preserve 
me  explicit  form  of  the  central  difference  integrator  M  must  be  diagonal  and  C  is  chosen  for 
example  as  C  =  cM.  Parameter  c  and  stepsize  ht  are  selected  to  obtain  the  fastest  con- 
jergeiice: 

6(s2/(a;L  +  a.L)"''’. 

'  c  =  , 

Inhere  and  are  respectively  the  lower  and  higher  pseudo-frequencies  of  the 
pseudo-dynamic  problem.  These  quantities  need  not  be  computed  exactly.  Rough  estimates 
'pr  both  pseudo-frequencies  are  sufficient  [7].  More  details  on  the  selection  of  M,  C,  c,  and  8/ 
nay  be  found  in  [20].  Underwood  proposed  in  [7]  an  adaptive  DR  scheme,  where  the 
integration  parameters  change  from  step  to  step.  Here,  we  follow  his  work  except  for  the 
■dapiive  lowest  pseudo-frequency,  where  we  found  that 

/  S«  Sr 

is  a  more  effective  approximation  to  The  resulting  algorithm  is  displayed  in  Table  3. 
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1 


Table  3 
DR  algorithm 


(5o) 


Initialize 


(S„)  Iterate 


1 
J 
J 
1 
1 
J 
J 

Clearly,  the  computations  involved  in  the  dynamic  relaxation  method  are  similar  to  those  of 
the  conjugate  gradient  method.  Hence,  they  are  performed  in  parallel  element-by-element  as  I 

HicriiccpH  nr#»vimi«lv  alcn  that  th#»cf»  f*nmmitatir>nc  ar^»  nf»rf<»rtlv  vprtnrirnhlp.  within  ftar.hJi 


«o  =  «o  =  0 

a,  =  l 

A  =  1 

Compute  using  equilibrium  principle. 
If  Iknlli  tolerance  terminate. 

=  "n-l 

,  {  bu'tr 

=  1/(1 +  Sto') 
^„,,=(l-8to:)/(l  +  8ra,:) 


discussed  previously.  Note  also  that  these  computations  are  perfectly  vectorizable  within  each 
process. 

4.  Concurrent  direct  method 


I 
J 

Direct  solution  techniques  have  been  popular  among  engineers,  mainly  because  of  two 
advantages  they  possess  over  iterative  schemes:  (1)  they  are  robust  for  ill-conditioned  systems  I 
which  often  arise  in  the  analysis  of  flexible  space  structures,  and  (2)  their  execution  time  can^ 
be  estimated  for  any  given  problem.  They  can  be  sensitive  to  round-off  error  (matrices  with 
high  condition  number),  but  their  main  disadvantage  is  that  they  suffer  from  having  excessive! 
storage  requirements  for  large  matrices,  so  that  an  out-of-core  solution  is  often  required. 
However,  they  are  still  attractive  for  supercomputers  such  as  Cray2,  where  the  main  memory  i 
can  store  up  to  256  million  double-precision  words.  In  this  section,  we  are  concerned  with  thej 
design  of  a  concurrent  direction  method  and  its  implementation  on  a  super-multiprocessor. 
The  resulting  algorithm  is  to  be  used  as  the  inner  loop  of  Newton-like  methods  for  the  solution  I 
at  each  step  k  of  the  linearized  system  of  equations  -■ 

Also,  we  introduce  a  dynamic  remapping  of  the  processors  on  the  computational  tasks  thatl 
achieves  a  load, balance  in  a  posteriori  nonlinear  problems  (for  example  problems  withJ 
material  nonlinearities,  where  the  .^lumber  and  location  of  elements  that  may  yield  at  a  loading 
step  are  not  known  in  advance).  1 

In  Fig.  3,  the  previous  irregular  finite  element  domain  D  is  shown  subdivided  into  a  system* 
of  iVp  subdomains  where  N^  is  the  number  of  available  processors  (here  N  was  set  to  four) 


1 


|The  mesh  nodes  which  are  common  to  the  subdomain  interfaces  are  not  part  of  any  D^  ;  they 
define  a  unique  global  interface  noted  by  /),.  The  finite  element  preprocessor  that  performs 

I  this  domain  decomposition  has  been  presented  in  [8].  It  has  been  designed  to  achieve  two 
basic  goals,  namely,  (1)  to  deliver  subdomains  that  require  equal  time  to  process,  and  (2) 
to  minimize  the  size  of  the  global  interface  Z>j  in  order  to  minimize  the  storage  requirements 


1(see  Table  4,  step  (53).  Numbering  first  the  nodal  point  unknowns  within  and  last  the  ones 
within  Dj  results  in  an  arrow  pattern  for  the  stifftiess  matrix  (Fig.  5).  Each  diagonal  block 
represents  the  local  suffness  of  a  subdomain  Dj.  An  off-diagonal  block  Kj^  denotes  the 
I  coupling  stiffness  between  and  D,.  Block  Ifi,  is  the  stiffness  of  the  global  interface  D,. 


Fig.  4.  Typical  subdomain  with  its  interface  nodes.  Fig.  5.  Pattern  of  the  resulting  stiffness  matrix. 
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Table  4 

Direct  solution  algorithm 

I 

.  . .  i 

(51) 

Factor 

II 

(/=1... 

■  ,^p) 

(52) 

Compute 

k],k;% 

and  % 

l-Np 

(/  =  1,. 
(y  =  i»- 

..,^p)  ] 

(53) 

Modify 

/-» 

and8/,  =  8/i-  2  % 

1 

1 

(54) 

Solve 

Kn  8uj  =  8/, 

1 

(55) 

Back-solve 

(;  =  i... 

Similarly,  «//))  denotes  the  sub  vector  of  «(/)  which  corresponds  to  the  nodal  poin 
unknowns  (forces)  lying  in  D^.  1 

A  hybrid  data  structure  is  used  to  implement  the  direct  solution  algorithm.  Diagonal  block? 
Kjj  and  are  stored  in  symmetric  skyline /profile  form.  The  mesh  nodes  are  renumbered  it 
parallel,  each  processor  renumbering  a  subdomain  D^.,  in  order  to  minimize  the  storaj 
requirements  associated  with  the  diagonal  blocks  K^j.  Because  of  their  important  sparsity 
off-diagonal  blocks  are  stored  column-wise  in  packed  lists  of  nonzero  elements.  Thi 
algorithm  for  the  solution  of  the  complete  finite  element  systems  is  given  in  symbolic  form  ij 
Table  4.  Initially  each  set  of  [K^j,  8^,  is  assigned  to  an  individual  processor  pj  so  that 

steps  (51)  and  (55)  are  trivially  carried  out  in  parallel.  Note  that  in  these  factorization  (5'| 
and  back-solve  (55)  phases,  each  processor  operates  on  distinct  locations  of  the  share* 


memory  so  that  a  maximum  efficiency  is  achieved.  The  subproblem  in  step  (54)  is  treated  wii^ 
a  parallel  active  column  equation  solver  [9].  Steps  (52)  and  (53)  require  special  attentioi| 
First  note  that  because  of  symmetry  in  both  and  /Sr,j,  only  half  of  the  computations 

in  steps  (52)  and  (53)  need  be  performed.  Moreover,  given  the  data  structure  of  thl 
off-diagonal  blocks  the  computations  in  step  (52)  are  carried  out  column-by-columiJ 
After  step  (51)  is  done,  if  the  initial  mapping,  that  is  the  mapping  of  each  processor  pj  onto 
the  set  {Kjj,  Kj^,  bfj,  huj},  is  maintained  though  the  subsequent  computations,  step  (53)  wouil 
produce  critical  regions;  each  processor  might  have  to  modify  the  same  half-column  (of 
half-row)  of  at  the  same  time.  Hence,  to  avoid  these  critical  regions  we  define  a  ne'| 
mapping  of  the  processors  that  is  activated  at  the  beginning  of  step  (52)  and  deactivated  at  tb| 
end  of  step  (53).  Processor  p,-  is  now  mapped  onto  columns  i  +  kN^  of  each  of  Kj^, 
;■  =  1, 2, . . . ,  A^p.  Step  (52)  is  then  carried  out  column  by  column  in  parallel.  In  this  way,  eacl 
processor  is  also  mapped  onto  different  entries  of  so  that  step  (53)  does  not  involve  anf 


critical  region.  Moreover,  to  avoid  memory  contentions  when  fetching  the  same  Kj^  for 
operations  on  distinct  columns  of  while  computing  K)^K~j^Kji,  the  processors  are  initial)! 
interleaved:  processor  p,  starts  first  with  the  columns  of  then  . . . ,  then  picks  up 

to  In  summary,  this  mapping  allows  steps  (52)  and  (53)  to  be  executed  in  parallpi 

without  the  need  for  any  synchronization.  Figure  6  summarizes  the  organization  of  thj 
complete  concurrent  computations  with  the  synchronization  points. 

Before  the  solution  phase  is  activated,  each  processor  is  mapped  onto  a  subdomain  D  .  II 
forms  the  elemental  stiffnesses  corresponding  to  its  subdomain  and  assembles  the  matrices 
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Processor  j 


fTTrrm  O  | 

^Smm 

E23  P2 


P3 


Factor 

Synchronize 

Loop  for  k-j  to  k  =  Np 

Loop  for  i  =  j  to  i  =  Oj  step  Np 

Compute  iK],Kj;K,,)[\i],  (•>/) 
Modify  •],  (•  >  /) 

Loop  for  1:  =  1  to  k  =  j~\ 

Loop  for  i  =  j  to  t  =  /ij  step  Np 

Compute  iK],K;;K,,r,i],r>i) 

Modify  *],(*>!) 

Loop  for  J  =  1  to  t  =  rtj  step  Np 
Compute  8/,)[ij 

Modify  6/,[z] 

Synchronize 

Join  parallel  solver  for  step  (54) 

Synchronize 


-  - -  ~  Form  delta  /  =  5/y  -  8k, 

— -  Back-solve  8k^  =  8/* 

Fig.  6.  Individual  processor  computations/synchronizations. 


1  and  A'yj.  Then  it  computes  the  contribution  of  the  elements  of  Z).  to  K^.  After  each  iteration  k, 
1  the  number  of  elements  which  yield  may  vary  from  subdomain  to  subdomain.  Hence,  the 
initial  mapping  of  the  processors  would  result  in  an  inefficient  concurrent  update  of  the 
tangent  stiffness  matrix  K{u^),  since  some  processors  would  have  to  work  less  than  others  and 
hence  would  have  to  wait  for  each  other.  The  same  is  true  for  the  state  determination  phase 
where  the  complexity  of  the  computation  of  the  internal  forces  depends  on  the  constitutive 
equation  that  applies  to  the  particular  element  in  a  specific  subdomain.  In  order  to  achieve  a 
much  better  load  balance,  two  distinct  processor  mappings  are  used.  Mapping_l  is  the  set  of 
submappings  defined  previously  for  the  concurrent  direct  solution  of  the  complete  system  of 
linearized  equations.  Mapping_2  is  the  coloring  scheme  presented  in  Section  2.  When 
mapping_2  is  activated,  the  elements  within  a  list  L,  are  processed  concurrently  for  stiffness 
updates  and  state  determination,  on  the  basis  of  “first  processor  available  first  processor 
assigned”.  In  other  words,  mapping_2  is  exactly  the  general  framework  for  parallel  EBE 
computations  (Section  2). 


5.  Software  implementation  and  numerical  results 

A  prototype  for  finite  element  computations  on  shared-memory  multiprocessors  is  under 
development  at  the  Center  for  Space  Structures  and  Controls  (University  of  Colorado  at 
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Boulder).  The  software  architecture  and  the  numerical  algorithms  presented  in  this  paper  ael 
one  part  of  it.  A  test  version  has  been  implemented  on  Encore  Multimax,  Sequent  Balance, 
Alliant,  and  Cray2  using  the  Force  macros  [5].  CDC’s  ETA- 10  is  the  next  target  supermulti-1 
processor.  The  iForce  provides  a  FORTRAN-style  parallel  programming  language  utilizing  an* 
extensive  set  of  parallel  constructs.  It  offers  two  desirable  advantages: 

(1)  It  insulates  the  programmer  from  process  management,  leaving  him  free  to  concentrate  I 

on  the  synchronization  issues  of  parallel  programming.  ^ 

(2)  It  ensures  the  portability  of  his  code  to  several  different  shared-memory  multi-| 
processors.  Basically,  the  same  code  is  run  on  any  machine  where  the  Force  has  beenj 
installed. 

On  Alliant  computer,  the  compiler  recognizes  inherent  parallelism  at  the  DO  loop  levell 
without  the  need  for  the  programmer  to  invoke  any  explicit  parallel  construct.  This  mayJ 
facilitate  the  work  for  the  programmer.  However,  his  code  would  not  run  on  the  Cray2,  for 
example,  because  software  support  for  multitasking  on  this  super-multiprocessor  is  at  the! 
library  level,  where  the  user  makes  calls  to  ask  the  system  for  multitasking  functions.  For* 
synchronization  it  is  commonly  necesary  to  wait  until  all  processes  have  terminated  a  given  ■ 
task  or  to  make  sure  that  at  any  given  time  only  one  process  modifies  a  variable.  Thej 
procedures  for  these  synchronizations  are  machine  dependent.  The  Force  relieves  the  pro¬ 
grammer  from  the  burden  of  modifying  his  code  in  order  to  port  it  to  a  new  multiprocessor.  I 
Because  only  the  Force  constructs  need  be  reprogrammed  from  one  multiprocessor  to  * 
another,  his  precious  code  need  not  be  modified.  For  example,  if  the  desire  is  to  request  all 
processes  to  wait  until  the  longest  one  has  terminated,  the  same  Force  construct  ^'‘Barrier"  is  I 
invoked  on  any  multiprocessor.  On  the  Cray2  running  under  unicos,  the  Force  preprocessor  * 
will  read  the  simple  Barrier^'  statement  and  generate  the  following  complex  fortran  code;  j 

CALL  LOCKON(BARLCK) 

IF  (FFNBAR.LT.(NP-I))  THEN  I 

FFNBAR  =  FFNBAR  +  1  i 

CALL  LOCKOFF(BARLCK) 

CALL  LOCKON(BARWIT)  I 

ENDIF 

IF  (FFNBAR  .EQ.  (NP  -  1))  THEN  . 

ENDIF  J 

IF(FFNBAR.EQ.O)  THEN 

CALL  LOCKOFF(BARLCK)  I 

ELSE  i 

FFNBAR  =  FFNBAR  -  1 

CALL  LOCKOFF(BARWIT)  1 

ENDIF 


which  invokes  the  appropriate  unicos  multitasking  software  utilities. 

The  parallelization  of  each  computational  step  in  the  algorithms  described  in  this  paper  is 
managed  by  the  barrier  concept  as  described  in  [5],  rather  than  the  fork/ join  mechanism. 

In  a  fork/ join  mechanism  [17],  a  single  instruction  stream  would  fork  within  some 
subroutine  into  multiple  streams  which  would  perform  a  parallel  computation  and  then  join 
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Boulder).  The  software  architecture  and  the  numerical  algorithms  presented  in  this  paper  arej 
one  part  of  it.  A  test  version  has  been  implemented  on  Encore  Multimax,  Sequent  Balance, 
Alliant,  and  Cray2  using  the  Force  macros  [5].  CDC’s  ETA-10  is  the  next  target  supermulti-1 
processor.  The  Force  provides  a  FORTRAN-style  parallel  programming  language  utilizing  ani 
extensive  set  of  parallel  constructs.  It  offers  two  desirable  advantages: 

(1)  It  insulates  the  programmer  from  process  management,  leaving  him  free  to  concentratel 

on  the  synchronization  issues  of  parallel  programming.  ^ 

(2)  It  ensures  the  portability  of  his  code  to  several  different  shared-memory  multi-* 
processors.  Basically,  the  same  code  is  run  on  any  machine  where  the  Force  has  been! 
installed. 

On  Alliant  computers,  the  compiler  recognizes  inherent  parallelism  at  the  DO  loop  level  l 
without  the  need  for  the  programmer  to  invoke  any  explicit  parallel  construct.  This  may-* 
facilitate  the  work  for  the  programmer.  However,  his  code  would  not  run  on  the  Cray2,  for, 
example,  because  software  support  for  multitasking  on  this  super-multiprocessor  is  at  thel 
library  level,  where  the  user  makes  calls  to  ask  the  system  for  multitasking  functions.  For 
synchronization  it  is  commonly  necesary  to  wait  until  all  processes  have  terminated  a  given  ■ 
task  or  to  make  sure  that  at  any  given  time  only  one  process  modifies  a  variable.  TheJ 
procedures  for  these  synchronizations  are  machine  dependent.  The  Force  relieves  the  pro¬ 
grammer  from  the  burden  of  modifying  his  code  in  order  to  port  it  to  a  new  multiprocessor.  I 
Because  only  the  Force  constructs  need  be  reprogrammed  from  one  multiprocessor  to  * 
another,  his  precious  code  need  not  be  modified.  For  example,  if  the  desire  is  to  request  all 
processes  to  wait  until  the  longest  one  has  terminated,  the  same  Force  construct  '^Barrier”  is  I 
invoked  on  any  multiprocessor.  On  the  Cray2  running  under  unicos,  the  Force  preprocessor  * 
will  read  the  simple  '''‘Barrier"  statement  and  generate  the  following  complex  fortran  code:  • 

CALL  LOCKON(BARLCK) 

IF  (FFNBAR.LT.(NP-l))  THEN  I 

FFNBAR  =  FFNBAR  +  1  I 

CALL  LOCKOFF(BARLCK) 

CALL  LOCKON(BARWIT)  I 

ENDIF  * 

IF  (FFNBAR  .EQ.  (NP  -  1))  THEN  , 

ENDIF  I 

IF(FFNBAR.EQ.O)  THEN 

CALL  LOCKOFF(BARLCK)  | 

ELSE  J 

FFNBAR  =  FFNBAR -1 

CALL  LOCKOFF(BARWIT)  I 

ENDIF 

which  invokes  the  appropriate  unicos  multitasking  software  utilities.  1 

The  parallelization  of  each  computational  step  in  the  algorithms  described  in  this  paper  is 
managed  by  \ht  barrier  concept  as  described  in  [5],  rather  than  the  fork/join  mechanism.  1 
In  a  fork/ join  mechanism  [17],  a  single  instruction  stream  would  fork  within  some* 
subroutine  into  multiple  streams  which  would  perform  a  parallel  computation  and  then  join  « 
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into  a  single  stream  before  returning  from  the  subroutine.  The  disadvantage  of  this  scheme  lies 

I  in  its  poor  performance.  It  is  well  known  (Amdahl’s  second  law)  that  even  a  small  amount  of 
sequential  code  in  an  otherwise  parallel  program  can  ruin  the  sought-after  speed-up.  More¬ 
over,  the  overhead  associated  with  fork/ join  mechanisms  tends  to  be  expensive.  For  example, 
jit  has  been  found  that  on  the  CRAY  X-MP,  a  numerical  parallel  algorithm  should  perform  at 
*least  100,000  vector  floating-point  operations  per  fork/ join  operation  to  be  efficient  [18]. 

I  The  barrier  is  a  control-oriented  synchronization  mechanism.  Its  semantics  are  that  all 
processors  pause  until  the  slowest  processor  reaches  the  barrier,  then  continue  their  prescribed 
job.  It  is  more  efficient  than  the  fork/join  mechanism  because  process  environments  need  not 
jbe  allocated  or  released  [19]. 

»  The  synchronization  with  the  barrier  of  the  parallel  computational  steps  described  earlier  is 
illustrated  in  Fig.  7(a)  for  the  particular  case  of  a  4-processor  machine  and  a  3-color  problem. 
jBasically,  for  each  color  characterizing  a  list  of  internally  disjoint  elements,  each  processor 
p^  executes  the  same  vector  instructions  on  a  corresponding  subset  of  elements  Ly  \  then  waits 

J until  all  processors  have  finished  with  processing  their  assigned  elements  before  moving  to  the 
next  color.  The  alternative  use  of  fork/join  mechanisms  to  perform  the  parallel  processing  of 
each  color  would  require  the  allocation  then  the  release  of  process  environments  three  times, 

ionce  for  each  forking  and  once  for  each  joining  of  the  processes  (Fig.  7(b)). 

The  parallel  computations  presented  in  this  paper  are  illustrated  with  the  static  nonlinear 
analysis  of  a  space  structure  submitted  to  point  loading.  Each  bay  of  the  truss  beam  structure 
jshown  in  Fig.  8  is  made  out  of  a  four-longeron  beam  that  has  simple  single-axis  pivot  hinges 
and  double  folds  for  efficient  packaging.  A  series  of  battens  and  diagonals  connect  the 

{longeron  together  at  joints.  The  global  structure  has  1204  nodes,  3600  active  degrees  of 
freedom,  and  3905  elements.  The  static  nonlinear  analysis  is  performed  first  with  Jacobi-PCG 
and  DR  on  the  Alliant  FX/8  (8  processors).  The  pattern  of  connectivity  of  the  structure  is 
Relatively  congested  (up  to  9  elements  converging  at  a  common  node);  it  took  9  colors  to 
’partition  the  mesh  into  lists  of  internally  disjoint  elements.  The  repartition  of  the  elements 
among  the  lists  Lj  is  displayed  in  Table  5.  Note  that  each  list  contains  enough  elements  to 
justify  the  cost  of  the  two  global  synchronization  points  needed  for  managing  the  parallel 
computations. 


Fig.  7.  (a)  Synchronization  with  barriers,  (b)  Synchronization  with  fork/join  mechanism. 
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Fig.  8.  Truss  beam  space  structures,  1204  nodes,  3600  elements. 
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Experiments  run  with  one  to  seven  processors  (the  eighth  being  always  used  by  the  systen 
manager)  are  reported  in  Table  6,  The  speed-up,  S^p,  is  defined  as  the  ratio  Ti/T^p,  where 
denotes  the  CPU  time  elapsed  using  only  one  processor  and  T^p  denotes  the  CPU  time, 
elapsed  using  processors.  It  is  very  important  to  note  that  measures  the  performance  oj 
a  sequential  version  of  the  code  different  from  the  parallel  one,  in  the  sense  that  it  does  not 
contain  any  of  the  synchronization  system  calls.  The  efficiency  rate  is  defined  as  the  speed-up] 
per  processor.  It  is  reported  between  parentheses,  next  to  the  achieved  speed-up.  J 


Table  5 

Repartition  of  3905  elements  among  9  colors,  number  of  ele¬ 
ments  is  3905,  number  of  colors  is  9 


602  602  601  452  300  300  448  300  300 
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Experiments  run  with  one  to  seven  processors  (the  eighth  being  always  used  by  the  systen 
manager)  are  reported  in  Table  6.  The  speed-up,  is  defined  as  the  ratio  where 

denotes  the  CPU  time  elapsed  using  only  one  processor-  and  T^p  denotes  the  CPU  time, 
elapsed  using  N^,  processors.  It  is  very  important  to  note  that  measures  the  performance  oj 
a  sequential  version  of  the  code  different  from  the  parallel  one,  in  the  sense  that  it  does  not 
contain  any  of  the  synchronization  system  calls.  The  efficiency  rate  is  defined  as  the  speed-ujj 
per  processor.  It  is  reported  between  parentheses,  next  to  the  achieved  speed-up.  J 


Table  5 

Repartition  of  3905  elements  among  9  colors,  number  of  ele¬ 
ments  is  3905,  number  of  colors  is  9 


^2 

^3 

L-, 

^8 

4 

602 

602 

601 

452 

300 

300 

448 

300 

300 
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Table  6 

terformance  of  parallel  Jacobi-PCG  and  parallel  DR  on  Alliant  FX/8, 
roblem  size  is  3600  dof,  number  of  colors  is  9 


-  Number  of  processors 

Speed-up  for  PCG 

Speed-up  for  DR 

1  2 

1.92  (96%) 

1.95  (98%) 

3 

2.89  (96%) 

2.94  (98%) 

I  ^ 

3.77  (94%) 

3.84  (95%) 

1  5 

4.50  (90%) 

4.55  (91%) 

6 

5.13  (86%) 

5.22  (87%) 

1 _ 1 _ 

5.56  (79%) 

5.57  (80%) 

.  The  results  in  Table  6  demonstrate  that  relatively  high  rates  of  efficiency  can  be  achieved. 
|rhis  is  because  a  considerable  amount  of  computations  is  performed  in  parallel  between  two 
synchronization  points.  For  an  increasing  number  of  processors,  the  slight  decrease  in 
efficiency  is  due  to  bus  contention. 

i  The  analysis  is  repeated  with  the  concurrent  direct  solver  on  the  Cray2.  Since  four 
processors  are  available  on  this  supercomputer,  the  structure  is  partitioned  into  one,  two, 
ihree,  and  four  substructures  analyzed  respectively  with  one,  two,  three,  and  four  processors. 
Resulting  speed-ups  and  efficiency  rates  are  summarized  in  Table  7. 

.  Note  that  in  each  case,  the  algorithm  for  domain  decomposition  described  in  [8]  performs 
pxtremely  well  at  minimizing  the  number  of  interface  degrees  of  freedom.  Consequently,  the 
stiffness  submatrix  associated  with  Dp  which  suffers  fill-in  after  condensation  of  the 
degrees  of  freedom  in  each  subdomain  D^,  requires  very  little  computer  storage.  This  may  not 
re  the  case  for  three-dimensional  continuum  meshes,  but  even  for  these  problems,  the  Cray2 
offers  adequate  memory  space.  Moreover,  the  resulting  subdomains  are  perfectly  balanced  in 
|ach  case.  The  efficiency  of  our  implementation  is  clearly  demonstrated  by  the  resulting 
speed-ups.  Similar  performances  are  expected  to  be  achieved  on  the  ETA-10,  which  offers  8 
superprocessors  and  288  million  double-precision  words. 


S.  Conclusion 

A  general  approach  to  nonlinear  finite  element  parallel  computations  on  shared-memory 
multiprocessors  has  been  presented.  The  basic  software  architecture  is  built  around  an 
efficient  framework  that  minimizes  the  overhead  required  for  parallel  accumulation  of 
element-  by-element  concurrent  computations.  Two  levels  of  parallelism  are  exploited:  con- 


Table  7 

Performance  on  the  concurrent  direct  solver  on  Cray2,  problem  size  is  3600  d.o.f 


(dof)  (dof) 


Number  of  processors  Speed-up 


794 

1794 

12 

2 

1.98  (99%) 

192 

1192 

1192  — 

24 

3 

2.97  (99%) 

889 

889 

889  888 

45 

4 

3.80  (95%) 
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currency  at  the  outer-loop  and  vectorization  at  the  inner-loop.  A  highly  portable  prototype 
code  has  been  developed  using  the  Force.  It  features  a  parallel  implementation  of  iterative 
algorithms  such  as  Jacobi  and  EBE  preconditioned  conjugate  gradient  and  dynamic  relaxa¬ 
tion,  and  a  concurrent  direct  solver  based  on  substructuring.  The  parallel  iterative  algorithms 
are  very  efficient  for  solving  very  large  sparse  problems  on  multiprocessors  where  the  shared 
memory  cannot  accommodate  an  in-core  solution.  On  the  other  hand,  the  direct  solver  may  be 
necessary  for  the  analysis  of  very  flexible  space  structures  which  are  inherently  ill-conditioned. 
The  achieved  speed-ups  on  Alliant  FX/8  and  Cray2  confirm  the  potential  of  this  approach  to 
parallel  computing  on  shared-memory  multiprocessors.  The  extension  of  this  work  to  massive¬ 
ly  parallel  multiprocessors  is  being  carried  out  on  the  Connection  Machine  and  will  be  the 
subject  of  a  forthcoming  paper. 
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